テク ノ ホ ポリ ス 増 刊 


財 応 機種 手軽 に 打ち こめ る ブロ グラ ム 満 載 誌 


C=8007mk CCCCCCCCTP レル と 
Cs9807 mk 7 ………… ヶ 共 
C-6007mk7/6607… ラ 本 
M=NEWZ77………… 2 本 
(7 シリ ー ズ の で で で me いい ク 要 
45 (Pro。, Jr) テイ アイ イー ルイ ャ アイ を 
Z=700 シリ ー ズ ………… レル と 
AZ-200072200780B…/ 本 
R=200( ド … い … いい 

AS 上 で 人 いい いで いい いい レル 
ASO A( Z) 6 (08 / 恋 
7 アミ リー コン ピュ ー タ …… ノ 在 
8=700 フラ ミリ ー…… の レア 
C-75007750】7……… 本 
C-7257/7255………… 本 


流 朋 教室 


Cs=800 ル mk/7/ PC=880 ル mk /7 


串間 書店 


(CASIO、 


ゲー ム を 創る 快感 / を よー〈 知 っ て いる 僕たち に 、 ま た ひとつ ビッ 
グ な ニュ ー ス が 飛び 込ん びき た 。 カ シオ の 「 ゲ ー ム ラン ド 」 を 、PV- 
7 に 合体 / な 、 な ん と ノン プロ グラ ミン グ で 、 自分 ど だけ の オリ ジ ナ レ 
ゲー ム が 創れ て し まう / 操作 手順 も 、 メ ニュ ー 選 び も モニ ター 画 
面 に 次 々 と 表示 る れる …。 つ まり 、 コ ンピュータ と 対話 し な が ら 、 ゴ 
キ ゲ ン な ゲー ム を 完成 する こと が で きる っ て ワケ だ 。 


まず は ゲー ム の 背景 を 創る 
ゲー ム の 背景 は 、 背 景 を 動 
か す (スク ロー ル す る ) 方 法 
と 動か さる な い 方 法 、 ど ちら も 選 
べ で る ん だ 。 絵 は 、1 ド ッ ト 単 位 
に 細か 〈 描 ける こと は も ちろ ん 
32 種 類 の タイ ル パ タ ー ン の 
中 か ら 自由 に 選ん で 使う こと も で きる ソ : 


キャ ラク タ を 創る 

ゲー ム の 主人 公 は 、 敵 は 、 ど 
うし ょ うか 7?70K./ キャ ラク タ 
は 、20 枚 の サン プル か ら と 選 


べ る し 、 も ちろ ん 自分 で 創る 

こと だ っ て で きる ジ 
日 ゴキ ゲン な 効果 音 を 創る 
0 生 ゲ ー ム の 失 し さ を 倍増 さ せ 
を <UoRp roPP る の が サウ ンド 効果 。 メ ロ デ パ 
講 計 | 昔 を 作曲 し た り 、 サ ンプ ル 曲 
か ら 選 ん だ り …。 ま た 、 爆 発 
音 や SF 音 ・ キ ャ ラク タ の 動 


〈 音 な ど 、 イ メー ジ 音 も 自由 
に 選ぶ こと が で きる ん だ 。 

スト ー リ ー を 創る RB 

ゲー ム ス タ ー ト や ゲー ム オ ー 60 

バー の 音 、 そ し て キャ ラク タ 8 

の 動き や 強 る 。 タ イマ ー の 使 

い 方 や 、 効 果 音 の 使い 方 な 
ど な ど 、 自 分 だ け の スト ー リ ー 
を 決め る と 、 オ リ ジ ナ ル ゲ ー ム 
は いよ いよ 完成 だ 。 き あぁ 、 み ん な を 呼ん で キミ の ゲー ム で じゃ ん 
じゃ ん 遊ば う / 


圏 タ ッ チ パネ ル TP-7 \19,800 圏 ジ ョ イス ティ ッ ク TJ-7 \2.900 田 デ ー タ 
レコ ー ダ KR-7 \12.800 圏 カ セッ トイ ンタ ー フ ェ イ ス FA-32 \3.000 較 拡 
張 ボ ックス ( 赤 ・ 黒 ) KB-7 \14.800 圏 増設 RAM カ ー ト リッ ジ 8KB (本 体 専 
用 ) OR-208 \5,800 16KB (拡張 ボッ クス 専用 ) OR-216 \7.800 64KB 
(近日 発売 予定 ) 


6KB か ら 64KB ま で 発展 自由 。 拡 張 ボ ックス を 


合体 すれ ば 3 スロ ッ ト の 威力 


RAM 容 量 を 増やし た り 、MSX 規 格 の 
フロ ッ ピ ー・ テ イス ク や ワー プロ 、 

を し て ブリ ンタ を 使う な ど 、 カ シオ 

MSX は シス テム を 自由 自在 に 
発展 させ る こと が で きま す 。 


PV-2000 用 ROM カ ー ト リッ ジ 「 大 障害 競馬 」 近 日 発売 


カン シオ 記 4 バ パー ソナ ルコ ンピュータ PV -7 


人 @ 写 真 の テレ ビ は 本 体 価格 に 含ま れ ま せん 。 ご 家庭 の テレ ビ を ご 使用 くだ さい 。 (増設 RAM カ ー ト リッ ジ は 別売 ) 

@ 本 体 の ボディ カラ ー は 、 赤 と 黒 の 2 種類 で す 。 @⑱MSX マ ー ク は 、 マ イク ロ ソ フト 社 の 商標 で す 。 
カタ ログ の ご 請求 は 、 郵 便 番号 、 住 所 、 氏 名 、 年 令 、 職 業 ( 学 年 ) を お 書き の 上 、〒|60 東 京都 新宿 区 西新 宿 2-6 (新宿 
住友 ビ ピル) カシ オ 計 算 機 帆 宣 伝 企画 部 PP 係 へ 


安全 包装 で 安心 し て 見 て いた だ ける 

よい この ポシェット ギャ ラリ ー で す 。 

各 機種 の お も し ろ プ ログ ラム を 詰め 

あわ せ た カ ラー バッ ケー ジ 。 い つも 

より 、 楽 し さも 大 きく な っ た 大 増 4 
ログ ラム ペー ジ で あり ます 。 


ッ ト VOL 


y で ぶ 大 先生 が 3 日 間 徹夜 で デ ゲーム し な が ら が ん ば っ 
た マシ ン 語 入り 添削 。 そ の まま で も 十分 楽し め る オリ 
ジ ナ ルプ ログ ラム と が っ ぷり 4 つ に 組ん で 、 グ ラフ ィ 
ックス 二 マ シン 語 で グレ ー ド アッ プ し て みた ぞ 。 


AA あ ちこ ち に 散ら ば っ た 数 字 を 1 カ所 に 集め て きれ 
い に な ら べ でる 数 字 パ ズル 。 向こう に 隠れ て いる 7 を 
こっ ちの ほう に 持っ て きた いけ 
ど 、5 が ジャ マ だ …… な ん て 軽 


ョ い 頭 の 体操 。 る 9 
コ :59 の 麗 怖 較 ズル 

4 3 時 59 分 、 つ い 機械 の な か に ら 色 ! r 

入り こん だ キミ に お そい か か る も 


. パ プレ ス 機 械 。4 時 の 終了 時 刻ま 
で キミ は 生き の びら れる か ? 


pg きれ いな 色 を クル ッ ク ル ッ と 入れ か えて 、 
完成 図 通り に 仕上 げ る 、 平 面 版 ル ー ビ ッ クキ 
ュー ブ を PC-8001 の 画面 で 楽し め る 。 


太 瞳 は 5 分 で 打ち 込ん て 楽し め る アイ デア フル な 1 画面 プ ゴロ グラ ム で す 。 


果て 無き a 画 


2 本 肖 散 攻 天 る ) 省 は いつ 果て る と も 知れ ず …… ゴー ル に 
つい て も つい て も 、 す ぐに また 次 の ゴー ル 
が 現れ る 。 手 梱 弾 と ジャ ンプ て 敵 を か わし 
な が ら 、 永 遠 に 続く 道 を 走り 続け る の だ 。 


ヤシ ンプ ブル な 画面 に 、 意外 に リ 

アル な 敵 機 が 登場 。 照 準 を ピタ [OWN 
リ と あわ せ て 、 一 発 必中 / 敵 

の 放っ た ミサ イル を 迎 撃 す る 、 緊 急 時 照準 移動 用 の ボ 
タン も つい て いて 、 エ キサ イ テ ィ ング に 楽し め る 。 


C.G.IUH 本 


AA 同じ く 、CG. を 使っ た 15 パ ズル 風 ゲ 
ー ム 。 難易 度 も 選べ 、 完成 を 判定 する 
楽し も り 1 ルー チン も つい た 、 敬 異 の 1 画面 プロ 
グラ ム な の だ 。 


ROCKET JUURHNEY E 


えさ を 食べ な が ら 大 0 
きく 棚 っ て いく お な じ が ら 飛 び ま わ る ドッ ト 型 宇宙 船 。 で も 、 
み へ ビ の ゲー ム 。 で も 、 航行 装置 が 故障 し て …… すま 
と ころ どこ ろ に 見 えな パイ ロッ ト の 腕 の 見 せ ど こ ろだ 。 

い 毒 えさ あり / 


無情 に 動く ジャ ンプ 人 台 を 頼り に 最上 階 へ 飛び あがれ 。 ク 
リア の 実 を 10 個 取っ た ら 大 成功 。 で も 、 油 断 し て る と 、 追 
っ か け マ ン に や られ ちゃ う ぞ 。 


タグ クラ フィ ッ ク が 楽し め る 
スペ ー ス ・ シ ュー ティ ング 
・ ゲ ー ム 。 英 の UFO と キ 
ミ の スペ ー ス シッ プ の 一 騎 
うち だ 。 


mp | 較 | ヤ イ ン デ ィ ・ ジ 
FM プー | ヨー ンズ ば り の 

洞窟 探険 ゲー ム 。 
金塊 の ある と ころ に つき も の の 、 毒 サ ソ 
リ と 吸血 コウ モリ に つか ま ら な いよ うに 、。 
金塊 を 取り つく そう 。 


人 人物 款 し い メ ロディ に つつ まれ て 、 キ ミ は 空 
で 狐 纏 に 戦う 。 カ ラー を 変え て 楽し め る 、 ち ょ 
っ と 珍し い 1 画面 ソフ ト だ 。 


SCORE 
4189 
較 |HI-SCORE 
| 146288 


ー ロ ロロ NT 
国 Nu = | 
3 


有 地雷 を まき ちら 
し な が ら 、 迫 る 


| 敵 。 キ ミ は 1 台 の 戦車 を 駆 
っ て 前 線 を 守り 抜け 。 


き | ROUND 


上 Hi-Sc= 
Se 


時 SCORE= 
949 


HUNTING 敵 訂 本 


笑っ ちゃ う 、 動 | 


く リ ンコ な ん て / | 
代 ANNUN 賠 Al た だ で さえ た りな | 

い 酸 素 を リン ゴ に 
ヤヤ 見 る 見 る うち に 加速 し て 、 あ っ と いう ま に 横取り され て 、 キ 
風 の よ うに 消え て し まう 。 超 ス ピー ド 感 あふ 、 ミ は リン ゴ コ 狩 り に 
れる レー シン グ ・ カ ー。 た ちあ が っ た 。 


WALLG 則 
WALL 琴 


y 自分 の あと に 残し て きた 壁 が 、 い 
つ し か 自分 を 閉じ こめ ちゃ う 。 リ ア 
0 350 


LIFE GAME 入 


43 つ の 条件 で 大 きく 育っ た り 減 ん で し まっ 
た り 。 あ の 『 ラ イフ ・ ゲ ー ム 」 を X 1 の きれ 
いな グラ フィ ッ ク て 楽し め る 。 し か も 、1 画 
面 に お さま っ て いる ん だ も ん ね 。 


ENP 


ノー ネー ム 軍 団 を けち ヤヤ な ん て アホ な ボク / 武器 を 
らし な が ら 、 進ん で いこ 忘れ て 敵 に 向かっ て 飛び 立っ て 
う 。 ホ バー し て 、 意 地 し し まっ た 。 か く な る うえ は 、 右 
て 、 ラ スタ ー の 動き は 見 丈 な ボディ に モノ を いわ せ た 体 

て る だ け で も 楽し い ぞ 。 あたり 攻撃 ある の み / 


A パ コ ち ゃ ん が どん どん ハン ゴ を 昇っ て いく 、 か わい 
い ゲ ー ム 。 上 か ら 沙 ち て くる シャ ボン 玉 に 気 を つけ て 。 
クー の 編集 部 特製 バー ジョ ン 付 き / 


ヤブ プク ブクブク …… 
ー ダ の あわ を ひそ か に 
盗め 。 監視 人 に 見 つか 
っ た ら 、 ク ルク ルッ と 
回 転 し て アウ ト / 


礼法 ワー ブ の 術 を 駆使 し て 戦う に ff 用 八 。 
2 人 の 忍者 。 つかま ら な いよ うに AL 
逃げ まわ りな が ら 、 草 野原 に 落ち 6 (4 9 | 加 4 | 昌 
て いる ダイ ヤ を 取り つく し て し ま ヤノ / ト 幸 ・ で ー 人 デム や 
お う 。 4 足 を ベタ ベタ あや つっ て 床 に 


埋もれ た 宝 を 探せ 。、 で も カプ ト 
ムシ や サソリ や ナメ クジ が 、 ち 。 ユ 
よろ ちょ ろ と ジ ーー 馬 7 
ヤ マ す る を 。 ーー で ペ 3 婦 ピー / 3 


彼女 が と ら わ れ て いる モン 

スタ ー ビ ル ディ ング 。 キ ミ は | 
鍵 を すべ て 取り つく し 、 彼 女 
の いる 秘密 の 部 屋 へ の 入口 を 
あけ よう 。 


ご に O ひ G に 内 


PS 


を: マト 
:HRRRCTEI 


ー ニーーー 


閥 お うど 、 これ は ユ 
キミ は ドラ キュ ラ 。 ニー ク 。 タ イフ の 練 
今夜 も か わい い 女 の 習 を ラン ニン グ ゲ ー 
子 の 生 血 を 求め て さ ム に し ちゃ っ た 。 画 
ま よ い 歩 く 。 で も や 面 表示 どおり の キー 
っ ぱり 牧師 と 十字 架 を 打っ て いっ て ラン 
に は い の だ 。 ナー を 走ら 世 よ う 。 
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ぃ いた 穴 面 | 謀 
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ンス 昇 B ん へ 
版 テ つっ 0 と : ハ 
ク | て G 屋 : シ 
選 ジ い A eE - コ EAT Sat SUG RE ペ こ て CNWME で ご つ F 
マウ 志 自 
1 い * 気 る 上 っ 四 ク 脱 向 画 DA 
nw. と に て ト 出 を 面 迷い 
ポ : 1| つ “は 上 機 し 頼 に 路 か 
ケ ナ け 妖 ち へ 置 能 て り 工 / ノ に 
コス て 怪 や 上 置 も くに 夫 も 
うれ あと ? 
て 難 療 "っ 
ニ エ 9 つ ) 
ょ ボタ を 全 る 次 の 生 た 
ケ | 駆 ジ 置 ぞ 度 迷 図 感 
2 お 5 セ 路 と じ 
ン ツ レ を の 
な を い ト 加 
が や ろ ビ 
らら つ ん | SR (SS 較 原 RS 賠 RS SE /4 拓 5 所 隅 周 了 本 王 
デ つ な トト KNP デ N| 配信 記す 4 三 
モ けけ モル 較 mm みみ 旧 目 目 上 還 | 全 、 一 和 人 ご プ g い LA41 
画 ろ ン で に 
面 " ス 空 置 敵 が 向こう か ら だ ん だ ん 大 きく な 


っ て 迫っ て くる / 敵 
に 応じ て キー 


p ホバー タン ク と 敵 の 基地 。 ビ ー ム と ミサ イル 
を 使い わけ て 、 敵 を 破壊 せよ 。 な か に は 、 ビ ー 
ム を は ね か えす バキ ュ ラ も いる ぞ 。 ポ ケ コ ン の [ 1 
機能 を フル に 使っ た 、 サ ー チ 式 戦闘 ゲー ム 。 面 操作 を 変え る ムズ 
パタ ン は 6 種類 も ある の だ 。 さ が お も し ろ い 。 


の / 


プロ グラ ム ポ シェ ッ ト voLg も くじ 


田 ポ シッ に ギヤ セラ リー 全 掲 載 作品 を カラ ー で 紹介 し ちゃ いま す /……… イ 


較 恨 UN 誰 UN 添 基 談 窒 いざ マン シン 語 で グ レー ドア ッ プ ドー ら 
会 月 の テー マ 作 品 :TOR PC-8001mkII/8801umkII 『PARASHOOTERI 
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BATTLE FIELD 
地獄 の 迷路 。 
DRIFTING GAME 


CoO 1 CO | OO の ここ | o』) Cm Cm ICO で nn て に こそ さく) 
で ① い | SFTO EE Em て い oo BE ご 19 くっ) ad に ご る はぐ くく の) 


VXVY…… 自 機 移動 分 
X(AK),Y(AK) …… 


エイ リア ン の 座標 


MI ミス の 回 数 

AA で の の 1 面 で や っ つけ る べき エイ リア ン の 数 
Ace エイ リア ン の プロ グラ ム 上 で の 番号 
0 画面 に 現れ る エイ リア ン の 数 
XY…… 自 機 の 座標 


19 REM 
20 REM 
39 REM 
49 REM 
59 REMM "っ 。- コ 
69 REM | PARASHOOTER | 


SX.SY…… エ イリ アン 移動 分 

CU…… ミ サイ ル の 射程 距離 

MX.MY…… ミサ イル の 座標 

HH …… ハイ スコ ア 

一 参考 一 「 マ イコ ン BASIC マ ガ ジ ン 。 
64.4、FIRE CRACKER』 


に 
< 


250 PRINT 

_ [:MISS 
269 COLOR 
279 PRINT 


289 PRINT 


IH ロ 1 1 日 上" 


_ ガ 7 


人 


USING"[:ALIEN 二村 ] 
#] "に AAJMI・ 
6:LOCATE 9.21 
リプ ヘ キ ま キロ エー スハ キム スハ キー ロ ロキ ー ペ ーー キー 
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79 

89 

99 

1909 
119 
120 
139 
149 
159 
169 
179 
189 
190 
290 
2109 
220 
239 
ER 

249 


REM 1 by Bamboo.Sugar | 
2 
REM MeSSa9eG ホ ~ ツ ハハ イヤ タ ~ イ コン メン ! 

WIDTH 49.25:CONSOLE 9.25,.9,1 

COLOR 7.32:PRINT CHR も (12)* 

DEFINT  A-Z:DIM X(4) ,Y(4) 

B$=CHR$(31 )+STRING も (3,29) 

PA$= 「 人 際 、"+B や + " 証 証 "+B お も + いい 、/" 

SP$ ゃ = “" "+B$ も +" リ + ォ B+ " 較 

SP$ も =SP も  +B$+“" ":H=9 
DEFFNP(X,Y)=PEEK( &HF392+XX2+Yx120) 
REM Start! 

S=9:ST=1:MI=9:AA=14 

REM Stage! 

AL=(ST MOD 4)+1:AK=0 

COLOR 2.32:PRINT CHR$ も (12)::COLOR 7 
PRINT USING"[ :SCORE 壮 壮 半 9 ] PARASHOOT 
[:STAGE 1 "1S.STi 

LOCATE 9,24 


290 
399 
319 
320 
339 
349 
359 
3609 
379 
389 
399 
4099 
419 
420 
439 
440 
4509 
469 


LINE(9、23) -(38,23 ) 、" 較 "、5 
X=19:Y=12:CH$="V":VX=9:VY=1 

COLOR 7:LOCATE X、Y:PRINT CH$ 

FOR I=@ TO AL 
Y(1T)=4:X(I)=RND( 1 )x34+1:COLOR 4 
LOCATE X(I)-1 .Y(I)-3:PRINT PA$:・ 
COLOR 3:LOCATE X(I).Y(I):PRINT "まり" 
NEXT 

FOR !=1 TO 199:BEEP IMOD5 : NEXT 
REM Magicolor! 
1I9=INP(9):I1=INP(1):19=INP(9) 

IF !I9=255 AND Il=255 THEN 509 

IF Il1=254 THEN VY=-1:VX=9:CH も = "へ " 
IF 』9=251 THEN VY= 1:VX=9:CH$="V" 
IF I9=239 THEN VX=-1:VY=9:CH も =" く " 
IF I9=191 THEN VX= 1:VY=9:CH$=">" 
IF X+VX く 1 OR X+VX>37 THEN 599 

1F Y+VY<2 OR Y+VY>19 THEN 599 


[ ・ ・ nm・ 879 NEXT:COLOR 7:S=S+CU:AA=AA- 1 
NCP NPDC DD 889 LOCATE X(I)-1.Y(I)-3:PRINT SP$: 
499 IF F< ゝ 32 THEN 969 899 Y(I)=4:X(I)=RND( 1 )x34+1 
599 COLOR 7:LOCATE X.Y:PRINT CHS$: 999 LOCATE 7,9:PRINT USING" 提 提 杜 半 "<S 
5S19 IF 19=191 THEN 649 919 LOCATE11.24:PRINT USING"##"・AA・ 
529 REM Alienl 9 者 NEXT :GOTO 526 
= ( ) (AL+1 ) ! 
4 】 5 NINE た BPR きま 949 FOR 1I=1 TO 599:BEEP I MOD 5:NEXT 
559 COLOR 2:LOCATE X(AK)-1.Y(AK)-3:PRINT 1 959 AM 
SP$・: ut-1! 
569 X(AK)=X(AK)+SX:Y(AK)=Y(AK)+SY 979 FOR !=1 TO 5:BEEP1 
579 IF X(AK) く 1 OR X(AK) >34 THEN X(AK)=X( 7 989 MEI0NNSNRNDGINISAMRNDU 9820 
AK)+SGN( 29-X(AK) ) '%"。 
589 COLOR 4:LOCATE X(AK)-1.Y(AK)-3 999 BEEP9:NEXT:GOTO 1139 
599 PRINT PA$::COLOR 3 2 REMSGROS2 
699 LOCATE X(AK) ,Y(AK):PRINT "まげ : =9: 
619 IF FNP(X.,Y) >&H89 THEN 969 の 60 NB AND MX く <X(I)+2 THEN 193 
629 IF Y(AK)=21 THEN 1099 
639 GOTO 399 08 1F MY>Y(I)-4 AND MY<Y(1) THEN 195 
649 REM Fire sub! 
5) 659 YTV 1949 1=I+1:GOTO 1929 
669 MX=MX+VX:MY=MY+VY:F=FNP(MX , MY ) FOR の MP 和 
679 COLOR 7:LOCATE MX,MY:PRINT "・": ・Yー1・ 
689 BEEP 1:FOR I=1 TO 199:NEXT:BEEP 9 1979 COLOR 3:LOCATE X(I)J、YEPRINT まり 5 
699 COLOR 2:LOCATE MX,MY:PRINT " ": 1 2 0 19:BEEP1 : BEEP9 : NEXTJ.Y 
799 IF MY=21 THEN 1099 -3! 
719 IF MX=38 OR MX=9 OR MY=1 THEN 529 10】 1199 FOR 1I=1 TO 299:BEEP 1:BEEP 9 
1119 LOCATE RND(1 )x38 ,RND( 1 ) x2+21 
729 IF F=235 THEN 759 本 
739 IF F<>32 THEN 1909 1129 PRINT “ ・:N 
749 CU=CU-1:IF CU THEN 669 ELSE 529 @⑩ 0 3 本 
759 REM Bomb! = 8 
(6 】 769 FOR 1I=9 TO AL 1159 COLOR 7:MI=MI+1:LOCATE 36.,24 
779 IF MX=X(I) AND MY=Y(I) THEN 849 が EE ia 
789 NEXT 
799 FOR I=9@ TO AL:COLOR4 1189 REM GAME OVER! の - 
819 LOCATE X(1)-1.,Y(1I)-3:PRINT PA$: め 1199 LOCATE 14.12:PRINT +GAME OVER+ 
829 COLOR 3:LOCATE X(I).Y(I):PRINT "*" 2 0 AA 本 本 
839 NEXT:GOTO 5289 15: 6 
849 FOR J=9 TO 199:BEEP J MOD 2 1229 LOCATE 16,29:PRINT "Push [s1": 
859 COLOR2:LOCATE X(1) ,Y(1I) 1239 IF INKEY$ く >"s"THEN 1236 


869 PRINT CHR$(129x(JMOD2+1 ) )・ 1249 GOTO 189 


EVEEY 


ei パラ シュ ー ト の 
応 削 1 表示 を PUT@ で / 


オリ ジ ナ ル で は 、130160 行 で パラ シ ユ る 。 「 
ー ト の キャ ラク タダ を PA に 格納 し て 、 320 この 万 法 は 催 ガ に 一 般 的 に は “カシ コイ “ 
<360 行 で 一 発 PRINT す る 方 式 を と つて い やり方 な ん だ けれ ど 、 こ の プロ グラ ム で は 


/ 


や め だ た ほう が いい 。 

と いう の も 、 リ スト を 見 る と わ ガ る よう 
に 、 い ちい ち COLOR 命 人 琉 と LOCA TE 
命令 を と も な つて いる か ガ ら だ 。 

表示 に か か る 時 間 は 大 差 な いけ れ ど 、 こ 
ご で は 整数 型 の 配列 変数 PA%() を 使 つて 、 
PUT @ で 出し だ ほう が いい 。 その ほう が 、 


プロ グラ ム が ガス ツキ リ す る し 、 後 々 の バー . 


ジョ ン ア ッ ツ プ (ゾラ フィ ックス を 使う な ど ) 


【4 
流 削 グ 
佐藤 こん の プロ グラム の な か で 目立つ て 
バダ サイ "の は 、380~510 行 の キー 入力 処理 
だ 。 す べ て の キー に 対す る 劉 理 を | 文通 
し て 行っ て いる の で 、 ダ ラダ ラ と 長く な つっ 
て いる うえ に 実行 速度 で も 問題 が ある 。 

こう いう 場合 は 、 や は り 、 上 下 左右 に 番 
号 (パラ メー タ ) を つけ て 、 パ ラメ ー タ を 
手がかり に し て 処理 し て いく ほう が ガス マー 
ト だ 。 

まず 、 スナ ミミ の イラ ス に の よう に 、 上 * 
O、 右 っ 1 、 下っ 2、 を っ 3 と 方向 に 番号 
を つけ て みる 。 そ し て 、 そ れ ぞ れ の 万 向 と 
連動 する VX.VY ( 自 機 の 秘 動 分 ) と OH 
$ ( 自 機 の キヤ ラフ ) を 配列 で まとめ て 
し まえ ば いい の だ 。 つ まり 、 だ と えば 上 な 
ら VX(O)=O、VY(O)=ー1、CHSCO) 
=\ へ ?、 下 な ら VX(2)=O、VY( の )=1、 
CHS(2)=*YV“ と いう ふう に 。 

こう すれ ば 、 方 向 の パラ メー マタ を MV と 
し て 、VX(MV)、VY(MV)、CHS(MV) 
と いう 配列 の MV の 値 を ひこ 3 に 変え る こ 
と で 、 上 下 を 右 の 物 動 と キヤ ラク タ の 変更 
を スマ ー ト に 行え る わけ だ 。 ご の 配列 の 読 
み 込 み は 派 削 後 リ スト の 123124 行 で や つ 
て いる 。 

さて 、 配 列 変数 の パラ メー タ MV と キー 
入力 の 対 訪 は 、 論 理 演算 で や つて みよ う 。 

添削 後 リ スト の 390 行 、IO=INP(O) A 
ND INP(1 ) で は 、|214I6I8] キ ー が 押さ れ 
て いる か どう か を 、 変 数 IO に すべ て 入れ て 
お いて 、 次 の 400 行 、 

MD=4 十 (1O=239) 十 (IO=251)*2+ 
(IO=191)* 3 十 (IO=254)* 4 
で !2]4!6I8! キ ー の 入力 を ひこ 3 の 方 向 パ バラ 
メー タ に 変換 し て いる の だ (MD は 後 で M 


ざ 


キー 入力 の 受け 方 を 
スマ ー ト に / 


に も 有効 な の だ 。 具体 的 に は 、 泊 削 後 リ ス 
ト の 125 行 と 340 行 を 見 て ほし い 。 

125 行 で 、PA%( 1 ) に デー を 読み こ お 。 
これ は 、 オ リ ジ ナ ル と 同じ キヤ ラク タ の デ 
ー ツ だ 。 デ ー タ と キャ ラク フタ と の 関係 は マ 
ー ユ アル で 調べ て お いて ほし い 。 

そし て 、 こ の 配列 全体 を 340 行 で 、PUT@ 
し て いる わけ だ 。 

ここ を 変え る だ け で 、 プ ログ ラム の 感じ 


V に 代入 する ) 

400 行 の カツ コ の な か の 等 式 は 通常 の 等 式 
で は な ぐ て 、 等 式 が 成り 立て ば 、 一 1 の 値 を 
出す 語 理 演算 な の だ (そう で な い 場 合 は 、O 
に な る ) 

だ と えば 、 押 され だ キー が [|21( 下 ) な ら 、 
IO の 値 は 251 に な る の で 、400 行 の 式 を 亡 程 
式 に 代入 し た だ とき の よ うに 表現 する と 、 
MD=4( 〇 O 〇 )+( 一 1)x2+(O)x3+( 〇 O)x4 

ーー ワニ ジグ 

つま り 、MD に は 2 の の 値 ガ が 入る 。 こ れ は 、 
さつき 決め だ 下 亡 向 の パフ メー タダ と 一 致す 
る 。 同様 に '4、 キ ー な ら MD は 3 に 、 |6| キ ー 
な ら MD は 1 に 、 8) キー な ら MD は O に な 
る わけ だ 。 キ ー が 何 も 押 され て いな けれ ば 、 
MD は 4 と な つて 、 流 削 後 リ スト 410 行 で 460 
行 (それ まで の キャ ヤラ クタ 表示 ) に も ど さ 


計 隊 0 還 が 店 8 に ラジー 
ト が まつ だ く ラ ンダ ザム に 動い て いる 。 そ れ 
は それ で いい の だ が ガ 、 エ イリ アン の パラ シ 


3 〇 


が エレ ガン ト に な つ だ だ ろう 。 画面 だ け で 
な く ぐ 、 リ スト の 見 えも プロ グラ ム の うち だ 。 


れる こと に な る 。 

さて 、MD に 亡 向 の パラ メー タ が 入 つ だ 
わけ だ か がら 、 あ と は 簡単 ど 。MV=MD と 
し て 、 目 機 の 座標 X, Y に 移動 分 VX(MV) 
と VY(MV) を 加え て や れ ば いい 。 つ いで 
に 、 オ リ ジ ナ ル の 450~460 行 で や つて いる 
画面 端 の 処理 も ひと まとめ に 論理 演算 式 を 
つが つて や つて みた だ ( 派 削 後 の 430 て 440)。 

これ で が ガ な り ス マー ト に な つ だ は ず 。 


英 の 動き に 
性 格 を つけ る 


ュ ユート の 動き に いろ ん な お 性格 を 持 だ せる と 
も つと ゲー ム ら し ぐ な る ん じゃ な いか ガ な 。 
そこ で 、 パ ラ シ ユ ー ト の 色 を 変え 、 色 に 


よ つ て 動き 訪 を 変え て みよ う 。 

この 変更 は 簡単 。 

パラ シュ ユー ト は 変数 人 K で 番号 を 持つ て 
いる か ら 、 ご この 番号 に 万 じ て 動 き の ル ー チ 
ン に 飛ば せ ば いい の だ 。 つ まり 、ON AK 
GOSUB 行 番号 { 、 行 番号 II 、 行 番号 皿 、 
行 番 写 V! とい うつ 命令 を 使う (添削 後 リ スト 
の 540 行 〉 添 削 後 の リ スト 632、634、636 ガ そ 
れ ぞ れ の 動き ルー チン に な つて いる 。 ご これ 
で 自 機 に 近づい て こく る エイ リア ン や 自 機 
ら 選 ざか つて いく エイ リア ン 、 そし て ラン 
ダム に 動く エイ リア ン の 種類 の 性 格 づ け 
が で きだ わけ だ 。 

色 は 、/ か ら AK の 値 を 5| い だ た 数 を カラ 


六 削 4 


流 削 前 の リス ト で 遊ん で みれ ば わか る は 
ず だ が 、 と きど き や り きれ な い 場 面 が びあ る 。 
それ は 、 エ イリ アン を 革 と うと し て 、 ま ち 
が つて ルフ ラン ショー ト に の ほう に あて だ と きだ 。 
エイ リア ン は パラ シュ ユー トド か ら は ずれ 、 ま 
つ す ぐ 街 へ 降下 し て 、 ド カー ン 。 追う こと 
すら で き な い の だ 。 こ れ は や つば り 納 得 で 


ー コ ー ド と し て 使っ た 。 こ れ だ と 、 だ と え 
ば 黄色 の パラ シュ ユー ト は 追 つ か け て こく る け 
れ ど 、 折 の パラ シュ ー ト は どん どん 逃げ て 
いく こと に な る 。 し た が ガ っ て 、 い ろ ん ね お 作 
戦 も 立て られ る の で 、 ゲ ー ム の 楽し み が 広 
が る の だ 。 

な み に 色 の 指定 は 、 浅 削 後 の リス ト 340 
行 、590 行 な ど で PUT @ 命令 の 実行 時 に 行 
つた じい る 。 

敵 に 性 格 を つけ る 、 な ん て 一 見 難し そう 
な こと も 、 こ ん な ふう に 簡単 に で き て し ま 
う 。 プロ グラ ム を 組む まえ に 、 アル ゴリ ズ 
ム を 見 直し て みれ ば 、 は じ め の うち か ら で 
きる よう な こと な の だ 。 


ゲー ム だ っ て 
リア ル で あり た い / 


き な い 。 パ フシ ユー ト に あ だ た つ だ た の な ら 、 
だ と えば 穴 が あい て 降下 の スピ ー ド が 速く 
な る ぐら い に し て お きだ いも の 。 実際 、 そ 
の ほう が 戦闘 ゲー ハム と し て は リア ル に な る 。 
そ ざ で 、 バリラ ン ユ ー ド に 穴 が あり た と き 
の キャ フフ ツタ を PD と し て 、 あ や まつ て 
パラ シュ ユー ト を 撃つ て し まつ だ ら こ の PD 


DIM VX(3) ,VY(3) ,CH$(3) ,D(4) 、PA%(4) ,SP%( 6 ) 、PD%( 4 ) 
FOR I=9 TO 3:READ VX(1),VY(I).CH$S(T):NEXT 


DATA 9 。-1. へ 。1.。 >。9,1、V。-1.9, く < 


FOR !I=9 TO 4:READ PA%(1):NEXT:DATA -39748、-39747,-39841 ,239.238 
FOR 1I=9 TO 4:READ PD%X(1):NEXT:DATA 8420,-39747、-39944.8431 .238 
FOR I=9 TO 6:READ SP%(!):NEXT:DATA 8224.8224、8224.8224.8224.8224.32 


X=19:Y=12:MV=2:F=32 
D(I)=9:Y(I)=4:X(1)=RND( 1 )x34+1 


PUT@(X(1I)-1.Y(I)-3)-(X(1)+1 .Y(I)-1),PA%,7-1 


19=INP(9) AND INP(1):19=INP(9) 


MD=4+(19=239)+(I9=251 )X2+(19=191 )x3+(19=254)%4 


IF MD=4 THEN F=32:GOTO 469 


MV=MD:COLOR 2:LOCATE XYEPRINT " “ 


X=X-VX(MV)x((X+VX(MV) >9 ) AND (X+VX(MV) く 38 ) ) 
Y=Y-VY(MV)x((Y+VY(MV) >9) AND (X+VY(MV) く 38 ) ) 


F=FNP( X,Y ) 

COLOR 7:LOCATE X,Y:PRINT CH$S(MV)* 
IF F<>32 THEN 969 

IF I9<>191 THEN 529 

REM Fire sub! 

CU=5:MX=X:MY=Y 


MX=MX+VX(MV) :MY=MY+VY(MV) : 時 EN MY ) 


COLOR 7:LOCATE MXJMY:PRIN 

BEEP 1:FOR 1=1 TO 199: NEXT: BEEP g 
COLOR 2:LOCATE MX.MY:PRINT 

IF MY=21 THEN 1999 

IF MX=38 OR MX=9 OR MY=1 THEN 520 
IF F=235 THEN 759 

IF F<>32 THEN 1999 

CU=CU-1:IF CU THEN 485 


IF D(AK)=1 THEN SY=1-(RND(1)>.6) ELSE SY=-(RND(1)>.6) 


ON AK+1 GOSUB 632.634.636 .636 


PUT@(X(AK)-1,.Y(AK)-3)-(X(AK)+1 .Y(AK) ) , SPX 。2 
IF D(AK)=1 THEN PUT@(X(AK)-1 .Y(AK)-3)- 0 Y(AK)-1).PD%.7-AK: GOTO 609 


PUT@(X(AK)-1.Y(AK)-3)-(X(AK)+]1 .Y(AK)- 1)・ PA%,7-AK 


COLOR 3:LOCATE X(AK) 、Y(AK): 
IF Y(AK)>29 THEN 1996 
SX=1+(X(AK) く X)x2:RETURN 
SX=1+(X(AK)>X)x2:RETURN 
SX=RND( 1 ) x3- 1:RETURN 

FOR J=9 TO AL 


IF MX=X(J) AND MY=Y(J) THEN 1=J:J=AL 
PUT@(X(』 エ )-1,Y(1I)-3)-(X( エ )+1.Y(1I) ) .SP% 


D(IT)=9:Y(I)=4:X(』I)=RND( 1 ) 34+1 
929 IF AA>9 THEN 520 
1959 D(!)=1:GOTO 396 


PRINT "る " 


が 通常 の 倍 の スピ ー ド で 下 に 落ち る よう 
に し て みた だ 。 ご これ な ら 、 な ん と が 、 追 つか 


て いつ て 問 一 生 セ ー  / な ん て スリ ルル 
も 味わえ る 。 だ と え 失 敗 し て も 、 自 分 が 未 
熱 だ ひら と 納得 で きる わけ だ 。 

この 変更 も それ ほど 複雑 に は な ら な い 。 
D(AK) と いう 配列 を 使 つ て 、 パ フラシュ ユート 
の 状態 を 判断 する よう に で きれ ば 、 あ と は 
簡単 だ 。 

D(AK) が 0 な ら 番 号 AK の パフ シコ ユー ト 
は 正常 、D(AK) ガ 1 な ら 穴 あき と する 。 オ 
リ ジ ナ ル で パラ シュ ユー ト を 撃つ て し まう と 、 
1050 行 か けら の 負 理 に 入る ガ 、1050 行 に DD 
ーー 1 と 入れ れ ば 、 撃 ち ミ ス つ だ パフ シュ ユー 
ト の 状態 が D(AK) を 参照 する こと で わか が 
る よう に な る 。 動き の ルー チン は 、 注 削 後 
リス ト の 535 行 、 

IF D(AK)=1 THEN SY=1-(RND 
( 1).G)ELGE お Y テ ー(RIVD(1 みみ 6) 

も し D(AK) が 1 な ら 、 そ の 番号 の パラ シ 
ユー ト は 他 の パラ シュ ユー ト に 比べ て YY 座標 
の 増え 亡 が 倍 近く の 催 率 で 大 きく な る 。 つ 
まり 、 倍 の スピ ー ド で 落ち て いく と いう わ 
本 大 。 

まだ た 、 穴 あき パラ シュ ー ト の 表示 は 580 
行 で 行 つ て いる 。 


で 、 ま ず は BASIC 
上 の 添削 終了 


オリ ジ ナ ル は も と も と よかっ つた だ けど 、 派 
削 で さら に お も し ろ ぐ な つっ だ と 思う 。 

さて 、 左 の リス ト を 打ち 込む まえ に まず 、 
泊 削 前 の リス ト を 打ち 込 り で お いて ほし い 。 
で きれ ば し ば らく 演 削 前 で 遊 れ いで みる と い 


ク 


い 。 
その うえ で 、 
ぐ ⑨ 添 削 前 リス ト の 130-160 行 、 310 行 、500 


^510 行 、790 て 630 行 、1050ー1060 行 を 削 徐 。 


田 追 加 変 数 リス ト ・ 

PA…… パラシュート キャ ラク タ ・VX( 0 一 3) 

PD%%…… 穴 あき パラ シュ ー ト の キ ・ 
レタ ググ 5 

SP の …… パラ シュ ー ト と エイ リア YYCD ン 3) 


⑧640-740 行 の "FIRE SuDI" を 482 て 493 
行 に 行 番号 を つけ か える (これ は 下 の リ ス 


ト に も 入 つ て いる の で 、 そ れこ て 確 認 し な が 


ら 変 えて いく と いい ) 


si 自分 の 進 向 方 向 に ジル 


交 削 5 


基本 的 な ゲー ム の 要素 と し て は 、 以上 で 
十分 だ と 思う 。 た だ 、 何 度 も いう よう だ け 
れ ど 、 こ の ゲー ハム は も と が か な ど 完 成 され 
て いた の で 、 添削 し て みて も 、 い まい ち 派 
削 し た な / と いう 感じ が し て こない 。 そ 
ご で 、 局 いき っ て 、 クラ ライ ックス 収 し し 
て みた だ 。 
POC-8001 の プラ フィ ックス は 160X400 
ド ツ ト と か な り 荒 いけ ど 、 キ ャ ラク 6 作り 
さえ うま くべ や れ ば それ な り に サマ に は な つ 
た と 思う 。WIDTH を 80 に し て 、 画面 表示 
に ちよ つと 手 を 加え れ ば わり あい 簡単 に 変 
更 で きる 。 ここ で 、 さ っ き * 1 発 PRINT?* 
を PUTe に し て お いた の が 役立つ の だ が 、 
… 当然 、 予 想 さ れる よう に BASIC で は 
あま り に も 遅 こ な つて し まう 。 も は や アル 
ゴリ ズム の 直し で 速く な る と いう よう な 、 
な まや さ し い 段階 で は な い 。 

ググ グ 、 仕方 が な い / と いう わけ で 、 
2^3 日 の 徹夜 を 覚 析 し て 、 マ シン 語 を 導 
入 し て みた だ 。 色 の 補正 や 単純 な ミス な ど で 
手 ま ど つて し まつ た が 、 な か な か きれ いな 
^*PARASHOOTER” が で き あ が つた 
と 思う 。 ボ シ エ ッ ツ ト ギ ヤラ リー の カラ ー 写 
真 で 見 比べ て みて ぐれ 。 


Z の 


グラ フィ ックス マシ ン 語 
で グレ ー ド アッ プ / 


と ころ で 、 ひ と 口 に マシ ン 語 を 導入 する 
と いつ て も 、 大 部 分 の 読者 に は よく わか ら 
な いこ と が 多い だ ろう 。 こ こ で いき な り マ 
シン 語 の 初歩 か ら プ ログ ラミ ング まで 解説 
する わけ に は いか な いか ガ がら 、 マ シン 語 そ の 
も の は これ か ら の キミ た ちの 努力 次 第 こい 
うこ だし て (放し て ここ CMBASIO 
プロ グラ ム で マシ ン 語 を 呼び 出し て 使う 仕 
組 ( ツ シン 語 と の リン グ ) に つい て 説明 し て 
みよ う 。 

プロ グラ ム 全 体 の 構造 は 、 ほ と ん ど 流 削 
後 リ スト の まま だ が 、PUT< 命令 の 部 分 
が ご つっ そり 、 妙 な 代入 文 に 変わ つて いる こ 
と に 気がつく だ ろう 。 

A%(O) ニ ……| と いう 連続 と 、A =USR 
(FNA) と いう 部 分 まで が ガ 、 実 は マシ ン 語 
を 呼び 出す た め の 病 令 な の だ 。 

マシ ン 語 は 、 3000 行 以降 で チェッ クサ ム 
し な が ら 読 み 込 ん で いる が ガ 、 こ の デー が 、 
癌 西 の 表示 サブ ルー チン に な つて いる 。 

A%C ) と A=USR… を 使 つ て 、 こ の サ 
ブル ー チ ン を 呼 び 出 し て いる の だ 。 そ の 秘密 
は USR 関 数 に ある 。 この プロ グラ ム で は 、 
USRO<USR3 ま で 使っ つて いる が 、US 
R1 を 例 に と つて みる と 、 そ の アセ ンプ ラリ 


③ 前 ペー ジ の 浅 削 後 リ スト を 打ち 込む (482 
行 493 行 は 催 認 する の み で いい )。 


ン を 同時 に 消す スペ ー ス ・ 対す る Y 増 分 パラ ・D(0 一 4)…… パラ シュ ー ト の コン 
me 自分 の 進 向 方 向 に ・ メー タ ・ ディ ショ ン (0 で 正 
対す る X 増 分 パラ ・CHS$(0 一 3)…… 自 分 の 進行 方 向 ・ 常 1 で 穴 あ き ) 
メー タ ・ に 対す る キャ ラ ・MV…… 現 在 の 自分 の 進行 方 向 の パ 

ラメ ー タ 


スト は 右 の 図 の よう に な つて いる 。 多 少 、 マ 
シン 語 の 山 得 が びあ る 人 は 参考 に し て ほし い 。 

さて 、 や の アセ ツブ ノラ リド し ほ 、 USR 
1 と いう 関数 を 定義 し た も の だ 。 だ だ 、 関 
数 こい つて も 、BASIC 上 で ふつ う 使 関数 
の よう に た だ の 計算 を 行う わけ じゃ な い 。 
USR1( ) の ( ) の な か に ある 数 値 デ ー タ 
を も と に し て 、 キ ヤラ クタ の 表示 を 行 つ て 
いる の だ 。 

( ) の な ガ か に 入 つ て いる 、FNR と は 、 
12( 行 で 定義 し て いる 関数 で 、 も と に も どす 
と VARPTR(A%(O)) と いう 形 の も の 。 
VARPTRC ) と いう 関数 は 、( ) の な か の 
変数 ガメ モリ 上 の ご どの 位置 に ある の か を 教 
える 関数 な の だ 。 

そし て 、A%(O) と は 、 例 えば 自 機 の 初 
期 位 置 の XX 座標 を 格納 し て いる 配列 変数 で 
あり 、 メ モリ 上 で は すぐ 次 に 、Y 座 標 を 格 
納 し て いる A%%(1 )、 表 示す べき 自 機 の キ 
ヤラ フク 番号 を 格納 し て いる A( の ) が ガ あ 
る 。 こ の 配列 変数 は 、 羽 ず BASIC プ ログ ラ 
ム で USRNR 関 数 の 出 て こる まえ に 、 生 要 な デ 
ー タ ガ の 入 うつ て くる よう し リト グラ きれ て 
いる 。 

詳し い 説 明 は 省く が ( 石 の 図 の 説明 こと アセ 


ン ブ ラ 言語 の 入門 書 な ど で 理 解 を し て ほし 
い )、A%CO) の メモ リ 上 の アド レス さえ わ 
かれ ば 、 い も づる 式 に A%(O) こ A%( の ) 
の 内 容 も わか ひる よう に USR1 は 定義 (プロ 
グラ ミン グ ) され て いる の だ 。 そし て 、 そ 
の 内 容 を 使っ て 、 自 機 の キャ ラフ タ を 初期 


位置 に 表示 する 、 と いう こと を や つて いる 。 


し か も 、 そ の キヤ ラフ を 表示 する 場所 
の V-RAM 上 に 以前 あっ た デ ー タ を 、 日 A 
SIC に も どっ て か ら A に 入れ る 。 ここ まで 
が 、USR 1 の 作 き だ 。 こ こ で お も し ろ い の 


py まち が つて パラ シュ ー ト を 
撃つ と 、 ご 覧 の よう に し ぽん 
で 速く 落ち て いつ ちゃ うつ 。 
田 ジ セン ブラ リス ト 解 説 


《 関 数 値 と し て 値 を 返す べき アド レス 
(HL レジ スタ に 入っ て いる ) を セー ブ 


⑧A%( 0 ) の 格納 され て いる アド レス 
を HL レジ スタ に セッ ト す る 。 

⑲⑯D レ ジス タ に A 究 ( 0 ) の 下位 、E レ ジ 
スタ に A%( 1 ) の 下位 、 Acc に A 旬 (2) 


'%%X%%%%%%%%%%%%X%X%%%%XXXXXXXX ん XX ん XXXXXXXZXX%%%%X%%%%X% ん XX ん メス スス スズ スス スズ メメ メメ ええ 
6 ん 


[PARASHOOTER] 


PC-8001 の プラ フィ ッ ク 
限 界 ギリ ギリ に 人 迫 つ を キヤ 
タン ツン デ リ イン 。 ご れ で も 
わり と 苦労 し た の だ 。 


の 下位 を 読み 込む 。 

⑯ カ ラー コー ド を セッ ト す る 。 
Acc で て 示さ れる キャ ラク タ を PUT す 
し て お く 。 る 


ほ 表 示し た 位置 に あっ た デー タ を Acc 
と C レ ジス タ に セッ トト する 。 

@ 関 数 値 と し て 返す 値 を セッ ト す る 。 
⑱BASIC に 帰る 。 


は 、A%(O)-A※( ど ) に 、 例 えば ミサ イ 
ル の デー ダ を 入れ て や れ ば 、A=USR1( 
FNA) を 実行 する だ け で 、USR1 は ミサ 
イル の 表示 を 行 つ て くれ る と いう こと 。 そ 
し て 、A の 中 に は ミサ イル が 表示 され だ 場 
所 に も と あつ だ デー タダ が 入る わけ だ か ら 、 
ミサ イル が エイ リア ン に あめ た だ つ た だ か どう か 
の 判定 に 使う こと が で きる ( あ だ つ だ こき 
は 、A に エイ リア ン の デー タ が 入る の だ 〉 

マシ ン 語 の こと を 説明 し よう と する と 、 
友 大 な が ページ が 秘 要 な こと は わか つて い だ た 


PRRASN0OEERT:SY 剛 1 


Program Pochette Vol.5 Program TENSAKU 


Programed by Bamboo.Sugar / Enhanced by God hnard Debu 


8 ルレ 
' %%%%%%%% ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん 


CLEAR 399.&HE2FF:WIDTH 89.25:CONSOLE 9.25.9.1:COLOR 7、9,1:GOSUB 3999 

DEF USR=&HE3AA:DEF USR1=&HE3E1:DEF USR2=&HE3FF:DEF USR3=&HE45A:Z=&HE433 
DEFINT A-Y:DEFFNA=VARPTR(AX(9)):DIM VX(3) ,VY(3),D(4),AC(4).A%(5),C(7) 
RESTORE 123:FOR I=9 TO 3:READ VX(I)JVY(I)ENEXTEDATA 9,-1.1.9.9。1 ,-1.9 

!=1 TO 7:READ C(I):NEXT:DATA &H38,&H58,&H78 ,&H98 ,&HB8 , &HD8 , &HF8 

% ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん 


FOR 
' %% る ん 2 ん ん ん ん ん ら tart! 
S=9:ST=1:MI=9:AA=14 
'% ん % ん % ん XX%% otage! 


LOCATE 9.24:PRINT USING"[:ALIEN 


LOCATE 9.21:COLOR 6 


えん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん 
AL=(ST MOD 4)+1:AK=9:COLOR 7,9,1:PRINT CHR も (12)::A=USR3( 9 ) 
PRINT _ USING" [ :SCORE 提 提 半 半 #9]"+SPACE$( 41)+ "PARASHOOTER [:STAGE 提 手 17 15.ST: 


提 #]"+SPACE$(53)+"[:MISS 


1$=" ヽ キー ニュ ノ の ハ キム ハ キ ー ロ ロキ ー ヘ ーー キー ヘー キー ロロ =" EPRINT IT$ も 1$ も 
I$ も ="IHIIIEIIHH 上 1 ピ ロロ ロビ ロロ IIEIH コ 1 1 円 1 EPRINT IT$ も 1 も $: 


LINE(9.23)-(79.23)。" 還 ".5:COLOR 7 


X=29:Y=12:MV=2:A%(9)=X:AX(1)=Y:A%(2)=MV:A=USR1 (FNA ) 


POKE Z,.X:POKE Z+1.Y:POKE Z+2 .MV 

FOR !I=9 TO AL:Y(IT)=4:X(I)=RND(1)x34+1:D(I)=9:AC(I)=RND( 1 )x2:AX(9)=X(】) 
A%(1)=Y(1):AX(2)=D(I):A%(3)=C(7-1):A%(4)=AC(I)+5+112:A=USR2(FNA ) : NEXT 

1=1 TO 199:BEEP IMOD5 : NEXT 

"ん ん ん ん ん ん ん ん ん Key inPut and Put CurSOr %%X% ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん 
I9=INP(9) AND INP(1):I9=INP(9) 
MD=4+(19=239)+(I9=251 )xX2+(I9=191 )x*3+(I9=254)x4:IF MD=4 THEN 469 ELSE MV=MD 


FOR 


革 ] "5AA,MI: 


こと だ が 、 な ん と か 、BASI じ 上 で マシ ン 
語 を 使う と いう こと が どう いう こと な の か 
イメ ー ジ だ け で も わ ガ つて も ら え だ か な 。 
つい で に 付け 加え て お く と 、 マ シン 語 の 
呼び 出し に 整数 型 柄 別 AO と 、VAFHPFT 
R( パ リア ブル ・ ボ イン 1) を 組み あわ せ て 
使う こと で 、 パ ラメ ー タ の 数 が いく ぐら 多 ぐ 
な つて も 統一 し た 方 式 で マシ ン 語 サブ ルー 
ナン が 使え る し 、 ち よう つと こし た ミス で マシ 
ン 語 が 暴走 し て し まう 可能 性 も 低く な る 。 
マシ ン 語 ピ ギ ナ ー は 、 参 考 に し て は ほしい 。 


A=USR1(VARPTR(AX(9) ) ) 
AX%(9)=X LOCATION 
AX(1)=Y LOCATION 
AX%X(2)=CHARACTER NUMBER 


AF 


HL し 一 一 ーー 一 ーー WW 
E, (HL) ⑬ 


⑨ 


A.(HL) 
AF.AF・* 
A,9F8H 【D 
AF,AF' 
PUT44 一 《 


9DDH 

A.H F 』 LD A,XH 
gDDH 
C。L 


(HL .A GO 


HL 
(HL ) ,C 
AF 


・ LD C,XL 


HI) 


田 り SR 関数 デー タリ スト 
で USR 0…… 自分 の 表示 を 行う サ 
ブル ー チ ン 。 3 バイ ト か ら 成 る 、 ワ 
ー ク エリ ア を 持っ て いて 、 こ こ に 現 
% 在 表示 され て いる デー タ を セッ ト し 
て いる (リス ト の 310 行 で ワー ク の 初 
期 化 を 行っ て いる )。 つま り 、 こ の サ 
プ ブルー チン を コー ル す る 際 は 、 次 に 
表示 する 位置 と キャ ラク タ 番 号 ( 進 
行方 向 に 対応 し て いる ) を セッ ト し 
て 呼び 出す だ け で いい 。 こ れ で 前 に 
表示 され て いた 自分 を 消し 、 新しい 
自分 を 表示 し て くれ る 。 
@ 呼び 出し 方 
A め (0) =x 座 標 
A 多 (1) ニ y 座 標 
A 多 (2 ) ニキ ャ ラク タ 番 号 
EC SMY 
A=USR0 (VARPTR(A 守 (0 )) ) 
で 呼び 出し 
@ リ ター ン パ バ パラメータ 

自分 を 表示 し た 場所 に あっ た デー 
タ (2 バイ ト の 論理 和 ) を 関数 値 と 
じ で 返す ず 。 つ まり エイ リア シン が いた 


Z ア 


最終 添削 後 リス ト の 続き 


439 
449 
469 
489 
482 
484 
485 
487 
489 
499 
491 
492 
493 
o29 
539 
S32 
S533 
S59 
555 
S79 
S80 
699 
632 
634 
636 
759 
769 
849 
889 
899 
895 
999 
929 
939 
940 
959 
969 
979 
999 
1999 
19109 
1920 
1939 
19409 
1959 
1951 
1979 
1999 
11099 
1139 
1149 
1179 
1189 
1199 
1209 
1219 
1220 
1230 
1250 
39099 
3910 
3920 
3939 
3949 
3959 
3960 
3979 
3989 
3999 
31090 
3119 
3120 
3139 
3149 
3150 
3169 


IF I9 く <>191 THEN 529 


CU=5:MX=X:MY=Y 
IF MY>19 THEN 1999 


IF A>9 THEN 1999 
CU=CU- 1】: IF CU THEN 


AK=(AK+ 1 )MOD( AL+ 1 ) 


A=USR2(FNA ) : 


' ん % ん ん ん ん ん ん ん ん BOmb! 


IF AA>9 THEN 526 
' る ん ん ん ん % ん ん ん ん Clear! 


' %% ん %% ん ん ん ん ん OUt-1! 


BEEP9:NEXT:GOTO 1139 
る ん % ん ん ん ん ん ん % OUt-21 
1!=9 


1=I+1:GOTO 1929 


"ん ん ん ん ん えん ん OUt-3! 
' ん % ん ん %% ん % ん TTYI 


IF S>H THEN H=S 


PRINT 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


一 マシ ン 語 デー マリ スト 
0E300H- 0 E326H 

4X4 ドット の キャ ラク タ を PUT す 
る ルー チン 

0E327H-0H336H 

4X4 ド ッ ト の キャ ラク タ の デー タ 
2 進行 方 向 0 の 自分 

Nore 進行 方 向 1 の 自分 

22 So 進行 方 向 2 の 自分 

Sho 進行 方 向 3 の 自分 

4 …… Fire の キャ ラク タ 

5 2 エイ リ デン ン 1 


IF MX=38 OR MX=9 OR MY=1 THEN 529 " 
IF A=&H6BB6 OR A=&HA77A THEN 759 ' 


485 
- る る ん る % ん えん ん ん MOVe Alien! %%%%XX%XXXXXXXXZXXX%%XXXXXXXXXXXXXX%XXX%%% え ん 


Y=15:GOSUB 1259:LOCATE 35.15:PRINT USING" Hi 
Y=29:GOSUB 1259:LOCATE 35,.29:PRINT " 
I$=INKEY$:IF I$ く >"S" AND I$< く >"S" THEN 1239 ELSE 189 
FOR I=9 TO 2:POKE 8&8HF351+Yx129+18+Ix2。&HE8:NEXT : RETURN 

'%%% ん ん ん ん %% SET MACHINE LANGUAGE DATAS %X%XXXXXXXXXXXXXXXXXXXXXXXX%%%%%%%% え 
RESTORE 3959:FOR I=9 TO 11:READ D$:SUM=9:FOR J=9 TO 31 
2) ) :SUM=SUM+D:POKE &HE399+ TIx32+J,D 
NEXT:READ D$:IF VAL("&H"+D$)=(SUM MOD &H1999) THEN NEXT:RETURN 

"Data Error in":3959+Ix19: 
2127E387856F3E998C67D5E5CD7AE3D11A1346DD69A877231A46DD68A877D1CD ,FE9. 
89E323987798C97CC7F966E33E669F6996B66B7AA755AA2136E44F8787878187,F75 
856F3E998C67D5E5CD7AE3D19E9396961A13AE772319F9D511729919D19D29EE,CD2 
D1CD89E3984F98969323712323712B2B2BD511789919D119F9C97BCD99E37A87.,D14 
96994F999199F399C97BCD99E39159F3997AE6FE96994F99C9219999444F9929,AA9 
299929444D29992929C9F5E55E2356D52133E456235E237ED9E15623235E2323,B69 
4E2133E47223732371D9983EF898CD99E3D979CD99E3D9DD7CDDB5E1772377F1 , 99A 
C9FS5E55E2356EB5623235E23237E983EF898CD99E3DD7CDD4DE1772371F1C9F5.,0937 
E55E2356EB5623235E23234623234E23237EDD67E69F98DD7CE6F9C69898D5C5,D65 
CD99E3C1D1151D1D1D78987998CD37E3E1D1C9999999C9221111229CC7244224.B94 
427C19429889249199681111869999A742247A9999799889979921C8F3115999 ,790 
9E9106143E599999999977232319F5199C79FE1529ECC9999999999999999999,83F 


D=VAL("&H"+MID も S(D$,Jx2+ 1 


X=X-VX(MV)x((X+VX(MV) >9 ) AND (X+VX(MV) く 37 ) ) 
Y=Y-VY(MV)x((Y+VY(MV) >9) AND (Y+VY(MV) く 29 ) ) 
AX%(9)=X:AX(1)=Y:AX(2)=MV: IF USR(FNA) く <>9 THEN 969 


jS・LOCATE 11.24: 


IF MX>X(T)-2 AND MX く <X(T)+2 THEN 1939 ELSE 1949 
IF MY>Y(I)-4 AND MY<Y(I) THEN 1959 


ん ん ん %% ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん XX ん ん % ん ん ん %X%XXX%XXXXXXXXXXX え XXX え ん 
"+GAME OVER+" 


Push [s] 


・ BEEP : STOP 


6 see 8 エイ 1 ジッ 。 

7…… 爆発 の キャ ラク タ 

※ 各 番号 に 2 バイ ト ず つ 割 り 当 て ら 
れ て いる 。 エ イリ アン の キャ ラ は 1 
と 2 で パタ パタ (イカ イン ベー タダ タ 動 
き ) し で いる 

0 E337H- 0 E379H 

12X12 ド ッ ト の キャ ラク タ を PUT す 
る ルー チン 
0E37AH-- 0 E388H 

X, Y 座 標 か ら V- RAM の ア 
を 計算 する 


ドレ ス 


「 る % ん ん ん ん ん ん X ん FiTG SUb! %%%X%%XXXXXXXXXXXXXXX%XXXXXXXXXXXXXX ス スス スス スス 


MX=MX+VX(MV) : MY=MY+VY(MV) : A%( 9 ) =MX: A%( 1 ) =MY : AX%(2)=4:A= USR1 (FNA ) 

BEEP 1:FOR !I=1 TO 199:NEXT:BEEP 9: A%( 9 ) = MX:A%X(1 )=MY:AX(2)=4:B=USR1 (FNA ) 
You hit the city 

Fire is over 
You hit the Alien 

′ You hit the parashoot 


IF D(AK)=1 THEN SY=1-(RND( 1 ) >.6 ) :GOTO 559 ELSE SY=-(RND(1 ) >.6) 
ON AK+1 GOSUB 632.,634,636,636, 636 
A%(9)=X(AK):A%(1)=Y(AK) :A%(2)=D(AK) :A%(3)=C(7):A%(4)=AC(AK)+5+249 
A=USR2(FNA) :X(AK)=X(AK)+SX:Y(AK)=Y(AK)+SY:AC(AK)=-(AC(AK ) =9 ) 

IF _X(AK)<2 OR X(AK) >34 THEN X(AK) =X(AK)+SGN( 29-X(AK ) ) 
A%(0)=X(AK):AX(1)=Y(AK):AX(2)=D(AK) :A%(3) =C(7-AK) :A%(4)=AC(AK)+5+112 
IF Y(AK)>19 THEN 1999 ELSE 399 
SX=]1+(X(AK) く X) x2: RETURN 
SX=1+(X(AK) >X ) x2: RETURN 
SX=RND( 1 ) x3- 1 : RETURN 

ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん % ん ん ん ん XX%%%% ん ん XXZX%ZX%%XZX%XXX%%%%%%% 
FOR J=9 TO AL:IF MX=X(J) AND MY=Y(J) THEN 1=J:J=AL:NEXT ELSE NEXT 

FOR J=1 TO 199:BEEP J MOD 2:AX(9)=X(I):AX(1)=Y(1):A%(2)=7:A=USR1 (FNA ) : NEXT 
A%(9)=X(I):AX(1)=Y(1):A%(2)=D(T):A%(3) =C(7) :A%(4)=AC(T)+5+249:A=USR2(FNA ) 
Y(LT)=4:X(I)=RND( 1 )x34+1:D(I)=9:AC( 1 )=RND( 1)*2:A%(9)=X(1T):A%(1)=Y(1I) 
A%(2)=D(T):A%(3)=C(7-T):A%(4)=AC(]T)+5+112:A=USR2(FNA ) : S=S+CU: AA=AA- 1 
LOCATE 7.9:PRINT USING" 提 栖 韻 拉 拉 " PRINT USING" 拉 桂 " 
ん ん % ん ん ん ん ん ん ん ん ん ん ん ん % ん XX%%% ん ん %%%X%XXXXXXXZXXXZX%XZXX%XXX%XX%%% 
FOR !=1 TO 599:BEEP 1 MOD 5:NEXT:S=S+STx19:ST=ST+1:AA=14+ST:GOTO0289 

ら =S+STxX19:ST=ST+1:AA=14+ST:GOTO299 
%% ん ん ん ん ん ん ん ん ん ん ん ん % ん XX%% ん ん XX えん %%%%%XXXXXX%ZXX%XZXXXXXXXXX%%% 
FOR 1=1 TO 59:BEEP 1:LINE(Xx4 .Yx4)-(RND( 1)x158+1 ,RND( 1 ) x99+2 ) 、PSET , 2 


ゃ ん る ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん % ん ん %%%% ん XX%%%XXXZXXXXZXZXXXX%XXXXX え 


A%(9)=X(I):AX%(1)=Y(I):AX(2)=D( TI):AX(3) =C(7) :AX(4)=AC(1)+5+249:A=USR2(FNA ) 
D(I)=1:A%(9)=X(1):AX(1)=Y(I):A%(2)=D(I):A%(3)=C(7-1):A%(4)=AC(T)+5+112 
A=USR2(FNA ) : GOTO 529 

%% ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん XX ん XX%%XXXXXXZXXXXXXXXXXXXXX え ん 
FOR 1!=1 TO 299:BEEP 1:BEEP 9:LOCATE RND(1)x76,RND( 1)x2+21:PRINT " ": 
ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん ん XX% ん ん %%% ん XX%%X ん XXXX%XXXZXXXXZXXXXXXXXX え 
FOR 1I=1 TO 1999:NEXT:COLOR 7:MI=MI+1:LOCATE 76.24:PRINT USING"#" iMI : 

IF MI<>3 THEN 299 ELSE BEEP 
「 %%% ん えん % ん % ん る GAME OVER! 
Y=12:GOSUB 1259:LOCATE 35,12:PRINT 


・ 村 提 提 韻 提 間 


AA 


: NEXT 


"3HX19 


0E389H-0 GA 

X, Y 座 標 か ら ア トリ ビュ ー ト の アド 
レス を 計 貸 する 
0E399H-C0E3A9H 

アキ ュ ム レー タ の 内 容 を 120 倍 する 
0E 3AAHC0E3E0H 
USR0 

0E3E1H-0E3FEH 


・USR 1 


0E3FFH-- 0E432H 
USR 2 


位置 に 自分 が 移動 し た 場合 は 関数 値 
と し て 0FFFFH を 返す わけ だ 。 こ 
の 値 は 移動 に より 、 自 分 が パラ シュ 
ー ト や エイ リア ン に 当たっ た か どう 
か の 判定 に 使用 し て いる (リス ト の 
460 行 ) 


@USR 1 自分 の 初期 位置 へ の 
PUT と Fire、 爆 発 の キャ ラク タ 表 示 
を 行っ て いる 。 表 示 色 は 白 に 統一 さ 
れ て いる (リス ト の 300 行 な ど ) 

@ 呼 び 出し 方 


ee 


の (0 ) 三 x 座 標 
2% (1 ) ニ y 座 標 


A 当 (2) ニキ ャ ラク タ 秋 
で お いて 、 
A 三 USR 1 (VARPTR(A%( 0 ) ) ) 
で 呼び 出し 
@ リ ター ン パ バ パラメーター 
表示 を 行っ た 場所 に あっ た デー タ 
(2 バイ ト ) を 関数 と し て 返す 。 つ 
まり エイ リア ン 1 が いた 位置 に 表示 
を 行っ た 場合 、 関数 値 と し て 6BB 
6H を 返す わけ だ 。 こ の 値 は Fire が 
エイ リア ン や パラ シ ジ シュート に 当たっ 
か 人 否 か の 判定 に 使用 し て いる 


人 で USR 2…… バ パラシュート と エイ リ 
アン の 表示 を 行っ て いる (リス ト の 
330 行 な ど ) 

@ 呼び 出し 方 

A (0 ) ニ エ イ リア ン の x 座標 
A め (1 ) ニ エ イ リア ン の y 座標 
A2 (2 ) ニ パ ラ シ ュ ー ト の キャ ラ 
ググ 痢 号 
A 欠 (3) ニ パ ラ シ ュ ー ト の アト リ 
ビュ ー ト 値 
A 多 (4 ) ニ 上 位 4 ビッ ト が エイ リ 
アン の カラ ー コ ー ド 、 下 位 4 ビ ピット 
が エイ リア ン の キャ ラク タ 番 号 
MY 
A 三 USR 2(VARPTR(A%( 0 ) ) ) 
で 呼び 出し 

@ リ ター ン パ ラメ ー タ ー 

関数 と し て は 一 切 使 っ て いな い の 
反っ て くる 値 は 不定 


@USR 3…… アト リピ ビュ ー ト ・ エ リ 
ア の 初期 設定 を 行う (リス ト の 210 行 )。 
@ 呼 び 出し 方 
A 三 USR 3 (0) 

@ リ ター ン パ ラメ ー タ 

関数 と し て は 一 切 使 っ て いな い の 
で 、 返 っ て 来る 値 は 不定 


0E433H--0E435H 
自分 の ワー ク 用 。 現在 表 示さ れ て い 
る 自分 の デー タ が 入る 


16 X 座 標 
eee Y 座 標 

2…… キ ャ ラク タ 番 号 
0E436H -0E459H 


12X12 ド ボッ トド ト の キャ ラク クタ の デー ク 。 
18 バ イト 1 組 で 2 組 分 。 0 は 正常 、 
1 は し ぼん だ キャ ラ 

0E45AH-- 0 E476H 

USR 3 


プロ グラ ム ポ シェ ッ ト 第 巳 号 入賞 作品 


圏 打ち込む まえ に 

キミ の パソ コン に BASIC や モー ド が いく つか 
ある 場合 は 、 必 ず 、 ど の BASIC 、 どの モー ド の 
プロ グラ ム か を 、 タ イト ル の 下 に ある FOR 以下 
で 確か め て か ら 打 ち 込 ん で くだ さい 。 ま た 、 打 
ち 込 む 際 に 特別 な 方 法 が 必要 な 場合 は 、 遊 び 方 
や チェ ッ ク ポ イン ト に 書い て あり ます の で 、 ま 
ず そ ちら を よく 読ん で か ら 。 
還 リ スト に つい て 

掲載 し て いる リス ト は 、 プ リン タ か ら 打 ち 出 
し た も の を 縮 少 し た も の で す 。 た だ し 、 MZ 系 
や JR-200 な どの 機種 の 場合 、 通 常 の プリ ンタ で 
は 出 な い キ ャ ラク タ な ど を 貼り 込ん だ り 、 手 書 
き し た り し て いま す 。 そ の た め 、 場 合 に よっ て 
は 不 自然 に 見 える こと も あり ます が 、 プ ログ ラ 
ム が お か し いわ け で は あり ませ ん 。 
圏 バ グ に つい て 

掲載 し て いる プロ グラ ム は 何 度 も RUN させ 
て 確か め 、 も と も と バグ が ある も の な ど は 編集 
部 で 手直し し て いま す の で 、 本 来 の 意味 で の プ 
ログ ラム 上 の バグ は まず な いも の と 考え て いい 
と 思い ます 。 た だ 、 パ ンコ ン と プリ ンタ の 相 倫 、 
リナ ン バ ー の 際 の チェ ッ ク も れ 、E[ 刷 ] す る 際 の 
汚れ や 文字 の 欠け :…… な ど 、 十分 の 注意 を は ら 
っ て チェ ッ ク し て いる の で す が 、 そ の 網 を か い 
く で っ て 読者 の みな さん に こ 迷 惑 を お か け す る 
こと が あり ます 。 リ スト が 欠け た り 、 見 えな く 
な っ た り し た 場合 は 、 傘 (03) 295-4610 テク 
ノ ポ リス 編集 室 ポ シェ ッ ト 担 当 者 まで 問合せ て 
いた だ け ば 、 調 査 し て お 答え し ます 。 
置 電 話 を か ける まえ に 

電話 を か ける まえ に 次 の こと を 確認 し て くだ 
さい 。 
① 打 ち 込 み ミ ス で は な いか 
②⑦②BASIC や モー ド は あっ て いる か 

以上 の こと を 確認 し て も どう し て も 動か な い 
場合 に 電話 し て くだ さい 。 
還 電 話 を か ける と き に 

な る べく 、 パ ソコ ン の 近く か ら 電 話し て くだ 
さい 。 や む を えな い 場 合 は 、 ど ん な エラ ー メ ッ 
セー ジ が 出 た か 、 ある い は RUN し て どん な 状態 
に な が つた が な を も し た うえ で か り で くだ さい 
また 、 電 話 は な る べく 平日 の 夕方 6 時 て 8 時 に 
お 願い し ます 。 
較 マ シン 語 に つい て 

BASIC の プロ グラ ム で あり な が ら 、DATA 文 
の な か に マシ ン 語 ルー チン の 入っ て いる も の が 
あり ます が 、 そ の プロ グラ ム を 打ち 込み 終わ っ 
て RUN さ せる まえ に 、 テ ー プ に SAVE し て お く 


02 まう サ 、G の 
一 マシ ン 語 リ スト に つい て 

マシ ン 語 リス ト は ほ は 、 チェッ クサ ム の つい た 状 
態 で 掲載 し て いる の で 、 あ や まっ て チェ ッ ク サ 
ム の 数 字 ま で 打ち 込ま な いよ うに 注意 し て くだ 
さい 。 各 機種 の マシ ン 語 リ スト 用 の チェ ッ ク サ 
ム ・ ブ ログ ラム を 下 に 掲載 し て いま す 。 こ の 雑 
誌 で 掲載 する マシ ン 語 リス ト は 特殊 な も の を 除 
いて すべ て ニニ の チェ ッ ク サ サム ・ ブ ログ ラム で 出 
し た も の で す 。 
較 チ ェ ッ クサ ム ・ プ ログ ラム の 使い 方 

マシ ン 語 を 入力 し た ら 、 まず RUN の まえ に セ 
ー プ し て くだ さい (セー ブ の 仕方 は マニ ュ ア ル 
放 

次 に 、 そ の プロ グラ ム に 応じ た CLEAR 文 を 


実行 (これ は 記事 で その つど 触れ ます ) し て 、 


下 の チ ェ ッ クサ ム ・ プ ログ ラム を 入力 し 、 間 違 
い が な いか どう か を 確認 し て 、RUN。 ス ター ト 
アド レス 、 エ ンド アド レス (これ も 記事 に 書い 
て あり ます ) を 入力 し て 、 そ れ で よけれ ば Y|。 


19 


29 >> ッ 2 ッッ 2 ッッ CHECK-SUM 


1 語 

49 DIM ST(7) :M ゃ も = "Add 
59 INPUT "Start ADDRESS 
-69 INPUT "End ADDRESS = 
79 INPUT "Sure (y/n) 
89 IE W$ く > "YY" 
99 PRINT 


AND _W$ く >"y リ 


199 FOR ADD=SA TO _EA STEP 


119 
120 
130 
140 
159 
169 
170 
180 
190 
290 
219 
220 
239 
240 
259 
260 
2709 
280 
290 
399 
310 


PRINT MS 
FOR Il=9 TO 7:ST(T)=9 
FOR BL=9 TO 7 


っ SM=9 
FOR I=9 TO 7 


SM=SM+D: ST( 1 )=ST( 


NEXT 

PRINT “: 
NEXT 
PRINT 
PRINT 
SM=9 
FOR I=9 TO 7 


"6um 


SM=SM+ST( 1 ) 
NEXT 
PRINT “: 
IF INKEY$ く >" 
329 PRINT 
339 NEXT 
349 END 


ま 旧 選 N 


+ り +1 +2 +3 +4 +5 +6 +7 


た : 


する と 、64 バ イト ずつ の チェ ッ ク サ ム 付 き ダ ン 
プリ スト (掲載 し て いる リス ト と 同じ フォ ー マ 
ッ ト の も の が 表示 され ます 。 ス ペー ス ・ キ ー を 
押す と 、 次 の 64 バ イト 、 ま た 押す と 、 ま た 次 の 
6 Pree と いう ふう に 順次 表示 し て くれ る 
の で 、 掲 載 リ スト の タテ ヨコ に ある Sum の 部 
分 の 数 字 を 、 打 ち 込ん だ も の と 付け あわ せ て 確 
認 C て くだ きい また だ た 、 フ リン タ に 出力 する 場 
合 は 、 チ ェ ッ クサ ム ・ ブ ログ ラム の PRINT 文 を 
LPRINT に か えて くだ さい 。 


廊 この チェ ッ ク サ ム ・ ブ ログ ラム が 使え る 機種 
つ 人 PC- 8001 mkII / 8801,mk II 佑 PC-6001 
mkII 6601 @X1 シリ ー ズ 欠 MZ- 700 シリ ー ズ 
(Hu-BASIC) MSX@PASOPIA( 7 ) 介 MUL 
TI8 人 @FP-1100 @FM-7/8/NEW7 グ 77 

この 他 の 機種 に つい て は 、 そ の つど チェ ッ ク 
サム ・ プ ログ ラム を つけ ます 。 


Gu 


SU " 
"Yo も:SA=VAL("&H"+S$ ) 

"KE も :EA=VAL("&H"+E$) 

・IF W$S=E"N" OR W$= "nn" THEN 59 
THEN 59 


64 


・NEXT 


PRINT _ RIGHT も ("999"+HEX$ も (BLX8+ADD ) ,4)・" 


D=PEEK(BLX8+ADD+ 】 ) 


1 )+D 


PRINT _ RIGHT も ("9"+HEX も (CD) 2 う 17 "| 


"RIGHT$( "99"+HEX$(SM) . 3 ) 


PRINT _ RIGHT も BS( "9"+HEX も (ST(【 ) ) 2):" 


"・RIGHT も ("99"+HEX も (SM ) , 3 ) 


319 


クリ スマ ス の 夜 は マッ チ 折 り で 


FOR PC-8007nk// os 


遊び 亡 


まず 、 レ ベル を きい て 〈 る の で 、 初 
心 者 は 1 か ら 始め よう 。 次 に 先手 か 後 


1 1 ! 1 1 ! ! 1 io ii 


ーー ニー ニー ニー ニー ニー ニニ ーー ニニ ーー 


証 変 数 リス ト 

MC )…… ツ マッ チ の グラ フィ ッ ツク 
ーー 

MG お )… そ の マッ チ ガ 折れ て 
いる が いな いか ガ 

A( )…… マ ツチ の XX 座標 

違 【 2 ある マツ チ の グル ー プ 
が 通し 番号 で どこ か ら 
は じ ま る か 

L( )…… あ る 本 数 の 組 が ザ い ぐつ 
ある か 

し に Jpeo 用 の マッチ の グル ー 
が 奇数 ガ 偶数 ガ 


手 か を 決め る 。 先手 の と き は y、 後 手 
に し た か っ た ら y 以 外 の キー を 押 そ う 。 

山形 に な らん だ マッ チ を パソ コン と 
交 互 に 折っ て いっ て 、 最 後 の マ ッ チ を 
折っ て し まっ た ほう が 負け 。 


19 
29 
39 
49 
59 
69 
79 


89 


BEE 


0 
139 
140 
159 
169 
170 
189 
190 
299 
216 
229 
239 
249 
259 
260 
270 
2889 
299 
399 
319 
329 
339 


1 列 に 並 


ツン ッ < ピ 
の ン ン CN 


REM の や や の ひので ひ ひび ひひ ず の びび マッ チ オリ ノ ショ ウシ ~ ョ ヨ 


ん で いれ ば 1 度 に 何 本 折っ て も いい 。 
折る マッ チ の 指定 は 小文字 の アル ファ 
ベッ ト て で て b 一 c(⑪b と c が 折れ る )、a 一 a( a 
の マッ チ だ けが 折れ る ) の よう に すれ 
ば OK。 実 は 必勝 潜 が ある の だ よ 。 


by PON ( "84/97/17 ) 


トム 人 人 人 人 人 へ ム 人 ム ム ム ム ム ム ム ム / 
WIDTH46 、25:CONSOLE20 , 4.9、1 :COLOR6 , 233 : CMDSCREEN3 , 9 .7 : CMDCLS3: DEFINTA-Z 
DIMM( 25 ) ,.M$( 29 ) ,A(25) ,B(5) ,L(5) ,P(5) :FORI=9TO025 : READM( 』 ) : NEXT 
し L$=" 8,。。、bC,。,def ,,9ghij,K1mno":FORI=1TO5:FORP= 1TO1I :READA((T-1)x5+P) :NEXTP,! 
LINE(37.18)-(9,1)。" "。。BF:COLOR5 :LOCATE19,9:PRINT" マッ チ オリ ノ ショ ウシ ~ ョ " 
FORI=1TO8:READA$:COLORIMOD3+ 4 : LOCATE23,1+Tx2:PRINTA$:NEXT 
COLOR4:A=9:FORi=1TO5:FORP= 1TOI:A=A+1:M$((T-1)x5+P)=" ア ":CMDPUT(A((T-1)x5+P) ,I 


Z=15:COLOR7 :LOCATE9 , 23:PRINT" レ ベル 八 ? 


P9:M も (1)=" "ENEXT: 1FJ$= "ココ "THEN99 


THENA=A+ 1 :NEXTELSEL(A)=L(A)+1:B(A)=B:」=P 
NEXTI 


24 ) ,M,PSET : LOCATE4*(P+(5-』)/2).2+Ix3:PRINTMID$(“"abcdefghi jk1mno",A。1) :NEXTP,! 
(1or2)" 1:LV も =INPUT も (1):PRINTLV$:PRINT" 
セン テ テー ヤル 7? (y/n) "1:A や も =INPUT$( 1) :PRINTA$: IFA$ く >"y "THEN1 29 

96 IFZ=9THEN259ELSEJ$="":PRINT:PRINT" ト コラ オル 7?" 1:A も =INPUT$ も (1) :PRINTA$+"ー"::B も =IN 
PUT$(1):PRINTB$:IFA$ く "a"ORA$>"O"ORB$ く "a"ORB$>"o"THEN99 

人 A=INSTR(L$、A$) :B=INSTR(L$,B$) :FORI=ATOBSTEP(B く A ) x2+1 : IFM$( 1)=" "THEN99ELSENEX 


119 FORI=ATOBSTEP(B く A ) *2+1:C=(A-1 )/5+1:CMDPUT(A(I) 、Cw24) 。M(13) ,、PSET :Z=Z- 1: BEEP1 : 
120 J$=" コ "EERASEL:DIML(5) :FORI=1TO025:IFM$( 1 )=" ア "THENA=9:B= 1 :FORP=ITOI+5:IFM$(P) = 


Cs9:FORI=1TO5:C=C+L(T エ ):P(IE)=L( TE)MOD2: IFI>1ANDL( 1 ) =1THEND= 1 : NEXTELSENEXT 
IF(C=1ANDL( 1 )=9)O0R(P( 1 )=9ANDC- し ( 1 )=1 )THENA=B(D) :B=A+D-2:GOT0279 
IFP(1) く 1THEN189ELSEIFC-L( 1 )=1THENA=B(D) : B=A+D-1:GOTO279 


IFC-L( 1) =L(2)THENA=B(P(2)+1 ) : B=A+P( 2 ) :GOT0279 
IFL(3) く >1THEN239ELSEA=B(3) : IFP( 2 ) >9THEN219 
IFC- 1 - し (2 ) = し (1 )THENB=A-P( 1)+2:GOTO279 

IFC- 1 = し L( 2 )THENB=A+2:GOTO0279 


IFP(2)=1ANDC- 】 = し (2)0R(P( 1 ) =9ANDC- 1 - し (2) = し (1) ) THENB=A : GOT0279 
IFLV$= "2"ANDL( 4 )=1ANDC- 2-L( 2 ) =L( 1 )THENA=B( 4 ) : B=A+P( 2 ) w2+P( 1 ) :GOTO0279 
FORI=5TO1STEP- 1 : IFL( 1 ) >9THENA=B( 1 ) :B=A+I-1-RND( 1 )x(T-1) :GOTO279ELSENEXT 


PRINT"I WIN !11":PRINT "アナ タル オハ ~ ア サン ト テン コ ~ ク ニ イッ テ シマ イマ シタ !! 


PRINT"YOU WIN!! ":PRINT "アナ タル ソレ カラ シア ワ セ ニ クラ シマ シタ ! 
LINE22 2:PRINT "モウ イチ ト ~ 


LOCATE29,22:PRINTMID も (し $,A, 1)+"-"MID も (し $,B,1)+" 


":GOT02669 


ャ PM7 (y/n)" 5:A も =INPUT も (1):IFA$= "yy "THEN79ELSE339 
ヲ オリ マシ タ " EGOTO119 


DATA8,22.21789、21845.5295.15429.15429,15429,15429,15429,15429,15429.15429 
DATA8,22.21789.21845.5295,15429,3999 ,15,,3849.3855,15375.15429 
DATA99.83,114.68.99,139.52.83,114,145.37,68.99、139,161 


DATA キ ヨウ クリ スマ ス . . . 
eoe2etSe サイ コノ 。1 ツ ヲ オッ タ ト キ 了 アナタ, カ ~ 
COLOR , 9 : CONSOLE@ , 25 : CMDCLS3 : END 


し …… マ ツチ に 通し 番号 を つ ・ 80 レベ ル 、 先 手 入 力 
ける の に 使用 ・ 90-100 どこ を 折る か 

A…… ど こ か ら 折 る が ガ ・ 110 マッ ツチ を 折る 
B…… ど こま で 折る か ・ 120-230 コン ピュ ー タ の 思考 
〇 C……: あ る 本 数 の マッ チ の グル ・ ルー チン 

ー プ の 数 ・ 240~270 各種 メ ツ セージ 
D……1 つ し か な い マ ッ チ の グ ・ 270-320 DATA 

ルー プ ・ 330 END 
Z…… 残 り の マッ ツチ ・ 圏 チ ェ エッ フ ポ イン ト 
りお …… ど ちら の 番 ・。 ゲー ム そ の も の に つい て は 別 
LV$…… レ ベル ・ に 注文 は な いん で す が 、 ご この こく 
還 プ ロブ ラム の 説明 ・ らい の 、1 画面 で は な いし シヨ 


10 一 70 初期 設定 


ー ト と し て は 少し 短い プロ グラ 


ら @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ ⑳ @ @ @ @ @ @ @ @ @ @ @ 


ュ 了 アナタ ハー イシ ~ ワル ナ オヤ 。 カ タ ノ カオ ヲ ブ オモ イタ ~ー シ 。 ナ カ ~ ラ マッ チ ブ オッ テ 
テン コ ~ ク ニニ イク コト 。 敗 イ ウ マテ ~ モ ナイ . 、、 


へ を 見 る と 、 も う 少 し 見 だめ を 
気 に し て ほし いな 。 例え ば せつ 
が ガ ぐ 「 マ ツチ 」 な の だ か ら 燃 や 
し て 、 跡 に は も えさ し が 残る だ 
と か 、 ゲ ー ム 画面 と 説明 画面 を 
分 ける な ど 、 見 栄え の ずる ゲー 
ム ゐ ム に し て ほし い 。 な お 、 ご この プ 
ログ ラム で は 画面 設定 で COlOr 
文 を 使 つ て いる の で 画面 を フリ 
ア し たい 時 は COIOr,0 を 実行 し 
て が ちち L し LR キー と QB 
うつ ② で お こう て で くだ さい 。 (の 
0 


ノン 
C 


人 ジ 


フラ シマ シタ ! 


ペッ チ 橋 が 15 本 あっ て 、 お た が い 知恵 を は だ ら か せ て 、 最 後 の 1 本 を 相手 に 折ら せる と 勝ち 。 勝て ば 、 ア ナタ ハ ソレ カラ 
シア ワ セ ニ 


つて な わけ で 、 ハ ッ ビ ー に な る ん だ けど 、 み ん な に は 、3 回 の うち 2 回 は 勝つ て も らい だ い 。 


恐怖 の プレ ス 機 械 が 迫っ て くる ./ 


FOR FC-200Lm(///680Lmx/ 


1 CONSOLE 6, 25。 。 1: WIDTH 49.25:COLOR 7,32: PRINT CHRS2): DiM TY(35) : xc15 


2 K$=CHR$(29)+CHRS(29)+CHR$(29)+CHR$(29)+CHR$(31): 0 牧 n ロ KNK ま +「 圭 


K$+" オト "2T$ も =" 1 "TKS+1" 1 "1KS+" 還 還 還 " 

3 LINE(9,1)-(38,7) 。" 軒 "、3,BF:LINE(9,28)-(38.,23) , " 較 ",4.BF | 

4 FOR ji=9 TO 35 STEP 5:COLOR 5:LOCATE 1,7: PRINT Ti:TY(I)=7・ NEXT 1 

5 C$=" "+K$+" "+K$+" "TK$9" "ETIME$="03:59:99" 

6 COLOR 7:LOCATE 13,9:PRINT "TIME "TIME*::IF TIMES="64: 90: 6" THEN 16 

7 LOCATE X,16:PRINT C$: 

8 [=INP(9):IF 1=239 AND X〉 9 THEN X=X-5 ELSE IF =191 AND X<35 THEN XeXt5 

9 COLOR 6:LOCATE X,16:PRINT M$::BEEP1 :BEEP1 : BEEP1 : BEEP9 

16 TX=INT(RND(1 )x8)x5:TY(TX)=TY(TX)+2:COLOR 5:LOCATE TX,TY(TX):PRINT T$: 

11 IF TY(TX)=15 THEN IF PEEK(&HF382+TXx2+(TY(TX)+3)x129) く <>32 THEN 13 ELSE LOCATE 
TX,7:PRINT TS+K$S+C$+K$+C も : :TY(TX)=7 [ 

12 GOTO 6 
13 COLOR 
14 FOR != 
15 FOR != 
16 FOR != 


2:LOCATE X,17:PRINT " r "KSt"LFH "KS4"rHH MK4" し 

1 TO 7:COLOR 1:LOCATE 12,8tI:PRINT "<< GAME OVER >"::NEXTI 

1 TO 1999:BEEP1 :BEEPB :NEXT:END 

1 TO 7:COLOR 1:LOCATE 12、8I:PRINT "Congratulations*ii: BEEP:NEXT 


_ BY 聞 部 入 
一 変数 リス ト 


M ゃ Se 人 の 形 
T お …… プ レス 機 の 形 
CB…… 人 、 プ レス 機 の 消去 用 
に K や …… カ ー ソ ル 秘 動 用 
TIMES…… 時 間 

人 ak KEY 入力 、 ル ー プ 用 
一 プロ グラ ハム の 説明 

] 初期 設定 

ジー ら 5 キャ ラン タ 設 定 、 画 面 

作成 、 時 間 設 定 

6 時 間 判 定 、 時 間 表 示 
ノー98 人 の 移動 
10 プレ ス 機 の 表示 
1 つぶ れ だ か の 判定 
12 イン ルー チン 国人 へ / 
49819 グー ら ムク ブー に 
16 成功 / 
一 チェ ンク ボイン ト 

こ ご この プロ グラ バム は リプ レイ ボ 
ダン が な いん だ けど も は や つけ 
る の は 常識 。 ス ペー ス ・ キ ー を 


いい 
ON 
と す に 


\/O0g- つ ge ンジ 


R 批 喘 3 "リプ レイ キー に し て みよ う 。 
遊び 万 還 画 う まず 15 行 の END を GOTO 
[ EL の あこ で 17 に し て 次 の 行 を 入れ る 。 
NR の る れ ` 1 フ 7 IF INKEY$= 
時 間 も 終 わっ て 約 1 時 間 後 の 3 時 59 分 。 夫 内 の ヽ ヶ イ HEN RUN EL し 
プ ァ レス 工場 に 勤め る キミ は 、 ふ と し た ん 棚 ウ SE 1 フ 7 
財 曳 まだ ひま な 人 は 、6 ら 行 の IF 
SS 5 5 . 
4 1 マ 。 以下 を と れ ば 、 絶 対 に 終わ る こ 
iME 芳 7 機 ホ 失 は ほぼ て の の と の な い 、 無 限 地獄 の 麗 頂 ( テ 
sm し ZU > 休 ほ く 』 て の 
< を 名 U0 は プル ERUE クノ ポ リス の バイ ト に 仕事 が 終 
牟 0 り し ム ソノ の と - あや まち か ら 、 機 械 の な か に 入っ て し わる 日 は な い 編 )」 に 簡単 に 変え 
| し て 人 ん ` | 近 い っ 昌 中 ま の だ 。 そこ に 人 が あろ うと も 、 び た られ る よ (アハ ハハ ハ と 力 な ご 
1 ます 籍 た いひ す 5 プ レス し て し まう の が 機械 の 笑う )。 (フー) 
1 た の ん せ え : いこ の ろ 。 し か も 、 な なぜ が ラン ズム に で も 、 何 と か 救い は ある も の て で 、 
IN な す | P さい プレ ス し よう と する の で 、 よ ける の 6 の 工場 、4 時 に は 操 粘 止 し て 、 機 
| = 2 1 括 の 冷 填 も の 。 ス イッ チ を 切る こと も で き も 自動 的 に 止ま っ て し まう の で す 。 あ 
s か は 2 6 作 バ が いし 、 オ シク ラノ マ マ ド 必 ナッ デシ あ 、 よ か っ た 。 [416@| キ ー で 、 1 分 間 、 
6 受 | 1 6 48 マウ クノ ダ は 以 moee プレ ス の 魔手 か ら 逃 げ ば ま わっ て ね 。 
ょ 機 に Nm 一 』 
8 8 3 3  # 8 は 3 8 3 9 MI HH 昌 8 。 


江 ミ エッ トー / グ ん な か み 、 よ ー こ ちゃ ん や ゆみ ちゃ ん と 話 が し だ いな ぁ ー な ん て 思 つ て 編集 部 に 遊び ば に くる と き は 、 あ ら か じ め TEL で 、2 人 ア ケ 
果 人 1 が そろ つて いな いこ と を 確認 レ し まし ょ ー。2 人 の 会 話 の 中 に 入 つ て いく の は 常人 に は 不可 能 で す 。 


ao 


[1 31512| キ ー で 自分 ( 供 ) を 操り 、 画 
面 上 に 散ら ば っ て いる 数 字 を *1 2 3? 
Y456 パ 78973X3 に 整然 と 並 


し 叶 語 計 放 放 8 上 因 区 8 8  】 


1 0 1 

ン 湯 グー 3 ん 1 

W を 画 ラ ま 今 な 

Il 使 を ム 。 。 い 4A4 

1 て 近作 " 史 い っ ms 。 で る ゲー ム 。 完成 し た ら 次 の 面 に 進ん カビ じ 

H 。 は ん ら 1 て で ジャ ヤマ な フク ロック が 博 え て いく る 。 る ン 

ー 2 BE に 左 し ゝ 。 、 さ ウツ 

1 | ん 人 っ 上 た だ し 、 動 か し 方 が ちょ っ と 変わ っ ジウ 

0 ンダ 38 オマ の ) 2 Sa 

5 ん グ を て いて 、 数 字 は 介 と 場所 が 入れ か わる バ え 

1 も て グ か が よう に し か 動か せな い 。 ブ ロッ ク だ け で れ 
か 28 かう で 6 o 

捕 四 うん きま な ら を の まま 動か せる 。TIME0 で ケ わ 

1 時 _ _ 8 施し ニーム オー バー。 リ プレ イ は |] キ ー。 あ 

6 ーー 前 て 析 ま # 


数 字 を 運ん で バ パズル を 完成 


る も 


1 VIDTH48 , 25:CONSOLE9、25.6、1:COLOR7 32: CLEAR39 &HBFFF: PRINTCHRS(12: 
2 DEFINTA-Z:DEFUSR=&HD909 :FORI=9T062:READA$:POKE&HD669+1,VAL("&h"+A$) : NEXT 


3 PRINT" て 〈<< TIME 1599 SCENE 1 >>>":VRs&HF382:S= 1 ( 

4 X=2:Y=3:T=1596:A=49:B=9:LOCATEX.Y:PRINT"@":COLOR4: FORV=2T021STEP3: FORV=1T034ST 
EP3:LOCATEV,W:PRINT"/ ヽ ":LOCATEV.M+2:PRINT" ト "ENEXT:NEXT:D=16:E=5:F=5:G=6 

5 GOSUB11:IFP>320RV= コツ ツン ンー A:IFA=53THENA=At1 : XC=V:YC=V: GOTO5ELSEA 
=A+1: IFA<58GOTO5ELSED=12:E=2:F=7:G=3:C=(SMOD11)*5+19:COLOR5 

6 GOSUB11:IFP>320RV=5ANDW=3GOTO6ELSEIFB<CTHENLOCATEV,W:PRINT" 軒 ": B=B+1: :GOT06 


_7 COLOR7:LOCATE11.9:PRINTUSING" 析 拉 " い T:T=T-1: TFT く GOTO12ELSEI=INP(9):XZ=( 1=253AN 


DX>2)x3-(1=247ANDX く 35)x3:YZ=(1=223ANDY>3)x3- (1=251ANDY く 21 )x3:V=X:W=Y:H=9 
8 VsV+XZ:W=M+YZ:V=-(V く 2)x35-(V>35 )x2-(V>1ANDV く 36 )xV:W=-(W<3)x21 - (W〉21)*3-(V>2AND 


、W<22)xW:P=PEEK(VR+Vx2+Wx128): IFP=135THENH=1 : GOTO8ELSEIFP=32ANDHTHENLOCATEX。 Y:PRI 


NT" ":COLOR5:LOCATEV、W: BEEP1:PRINT" 還 ":BEEP9:GOTO16 

9 LOCATEX,Y:PRINT" ":U=VR+Xx2+Yx128:P=PEEK(U+XZx2+YZx128) : IFP=135THENXZ= り 記 YZ=8EL 
SEIFP=53THENXC=X:YC=Y:BEEP1 : POKEU,P: BEEP9ELSEIFP>48THENBEEP1 : POKEU、P: BEEP@ 

19 X=X+XZ:Y=Y+YZ:COLOR3:LOCATEX,Y:PRINT"@":FORI=9T0269:NEXT: UsUSR(XCx256+YC): IFU 


く 〉255GOTO7ELSEFORI=6T0599:NEXT:FORI=8T0599:BEEP1 : BEEP1 : BEEP : NEXT: FORI=9T05969: 


EXT:S=S+1:COLOR7:LOCATE39,6:PRINTUSING" 炎 "5S:LINE(1,2)-(36, 22)," ",BF: 0704 
11 VsINT(RND(1)xD)x3+E:W=INT(RND(1)*F)x3+G:U=VR+Vx2+Wx129:P=PEEK(U):RETURN 


12 COLOR6:LOCATE19.11:PRINT"[L[ GAME OVER ]]]":MAIT4,8,255:RUN 
13 DATA 5e,1c,23、56、 14,eb,11,2d、d9,3e, 31.96, 99.e5、f5。 1a,84,67,13, 1a,85,6f ,13,d5, 
cd,f3,93,d1,E1,be,e1 ,C9, 3c,19,ea,3e。 ff,21,a8。 f 77, 23, 9f 。 77: c9, fd, fd。 9 fd,3。 fd, を 


d。 ば .8, 3。 9, fd,3、『.3, 3.3 


て くく THE える 4 SCENE 4 うう > 


76 SpF 4 


レ だ 。 結果 は 最悪 。 も 一 、 どど し よー も な い 。 


表 個 9 


一 変数 リス ト 

火 , の 本 4 の 座標 
の 2 2 - 久 ” の 万 向 
NN ~ ら "の 座標 
ED( 5 世 N 世 半 


A…… 数 字 の 表示 用 
B, 〇 …… ブ ロッ フ 表 示 に 使用 


D,E,F.G…… 乱 数 用 

H…… プ ロッ の 移動 が 可能 か 
ご うか 

Ai キー スキ ヤン 用 

ロ Docs P ヒ EK 用 

り ……POKE,USR 関 数 用 

玉 プロ グラム の 説明 

] 初期 設定 

ど マシン 語 の 読み 込み 

て 〇 画面 作成 


メ . きき ー ス キヤ シン 、 タイ た た 表 
志 

ご ブロ ッ ク の 移動 判定 

9 数 字 の 秘 動 判定 

10 ~ 台 "の 移動 、 パ ズル が 
完成 し た か の 判断 

11  _ ブロック や 数 字 の 座標 を 
決め る ラン ダム サブ ルー 
9 

12 _ ゲー ム オ ー バ ー 興 理 

19 又 シ ン 二 デー タ 

田 チ エッ クボ ポイント 

これ で は ゲー ム が ガ が 簡単 すぎ る 

ね 。 ま ざ ず 3 行 、 ダ イム 表示 の 15 

00 を と り 、 最 後に T ニ ノ ら 0 を 

加え る 。 そ し て 24 行 の T の 値 を 

ニテ エー50 に し て 最後 に T 1 

三 「 を 加え る 。 さ ら に / 行 の P 

RINTUS TNG の 後 を …… 

ff 穫 ′ は 上 トル 2 すす 1 ま うす デ 1 

に すれ ば 〇 に K だ 。 で も 、 時 間 と 

の 闘い 的 な パズル より 、 純 粋 な 

思考 型 ゲ ー ム に し て ほし か つ だ 

な 。 (ノー) 


就職 が 決定 / し て 、 将 来 へ の 明る い 希 望 で いつ ば い の ク ー さ ん は 、 先 日 FM-7 の タロ ッ ト 占 いで 仕事 に つい て 占 つ て も らい ま 
占い な ん ガ で 一 きま らい だ と 叫ん で お り ま し た 。 


ん 
き 


パソ コン 版 の 平面 ルー ビッ ク / 


/O08- つ J@ ンク ググ っ ト 


、 1 WIDTH49.25:CONSOLEB.25.8,.1:DEFINTA-Z:COLOR7 :PRINTCHRS(12): DIMC(9):CLEAR1898 
2 E$=CHR$(31)+STRING$(5,29) :F$=CHR$S(31)+STRING$(8.29) :D$=" 凍 還 ":D や =" 環 較 " 
3 0$=B$+E$+B$+E$+B$+E$+B$+E$+B$:LOCATE 23,19:PRINT "ウド が タ カス" 

4 LOCATE25,5:PRINT" か も セイ か":FOR 1=1 TO 9 STEP 3:C(1)=6:C(+1)=3:C(1+2)=4:NEXT 


CC )…… パ ズル の 色 
BS,E お ,O お …… パ ズル の 表示 


5 LOCATE3,2:INPUT" け ン テ ノ も セイ に シマ "iNETFN>=1ANDN= く 15THEN6ELSEBEEP :GOTO5 用 

6 FORJ=1TON:RsINT(RND(1 )x5)+1:Q=INT(RND(1)*3)+1:S$=CHR$(96+R) :T=Q:GOSUB14 DS,F や お …… 完 成 図 の 表示 用 
7 NEXT:H=6:FORI=8TO145TEP3:COLORH:LOCATE24,1:PRINTDS+F$1DS:PRINT:IFH=6THENH=2 | … 動 か し だ 数 

8 H=Ht1:NEXT:COLOR7:L=6:GOSUB26:REM 1984『8 有 17B PC-8691 9 パズル Y.OKAMOTO 129 イ N-…… 何 回 か きま ぜ る か 

9 LOCATE 3,2:INPUT "に の コ * が マー の AS:GOSUB12:GOSUB28:LOCATE27,21:PRINTL 5 

16 FOR !=1 TO 9 STEP 3:IF CGI)=6 AND C(lt1)=3 AND C(142)=4 THEN NEXT ELSE 9 の Re ラク ダム 


11 LOCATE 3,2:INPUT "モウ イサ ト ~ ヤリ マス (Y/N) "iM を:1E M$="Y"ORM$="y" THEN 4 ELSE END 
12 S$=MIDS(A$、1、1):T=VAL(MID$(A$,2.1) ) :1FLEN(A$)=2THEN13ELSEBEEP:RETURN 
13 IF S$=<"e" AND S$>="a" AND T=<3 AND T>=1 THEN 14 ELSEBEEP:RETURN 


S$…… ど こ を うごか すか 
T…… 何 回 うら ご か すか 
GHP…… 名 種 カ ウン タ 


14 IF S$="a" THENFOR 1=1 TO T:C=C(1):C(1)=C(2) :C(2)=C(5):C(5)=C(4):C(4)=C:NEXT ee 
15 IF S$="b" THENFOR 1=1 TO T:C=C(4):C(4)=C(5) :C(5)=C(8):C(8)=C(7):C(7)=C:NEXT_ 還 ブロ プラム の 説明 
16 IF S$="c" THENFOR 1=1 TO T:C=C(2) :C(2)sC(3) :C(3)=C(6) :C(6)=C(5):C(5)=C:NEXT_ 1 一 4 初期 設定 
17 IF 5$="d" THENFOR =1 TO T:C=C(5):C(5)=C(6):C(6)=C(9):C(9)=C(8):C(8)=C:NEXT 5 手数 の 入力 
18 IF S$s"e" THEN FOR !=1 TO T:C=C(1):C(1)=C(2):C(1)=C(3):C(2)=C(6): C(3=C(9): C 6 まぜ る 
(6)=C(8) :C(9)=C(7):C(8)=C(4):C(4)=C(18):C(7)=C:NEXT 。 | フー 完成 較 の 表示 
19 L=Lt1:RETURN:REM マコ ン ル キ 7 カ月 PC-8881 mk2 model 38 ヵ RM-77 か X-1 か イイ 突 負 
2 G=1:FOR 1=3 TO 15 STEP 6:FOR J=6 TO 18 6:COLOR C(G):LOCATE I,J:PRINT 0: づ 動 ガ し の 入力 
G=G+1:NEXT J.I:COLOR 7:P=65:FOR !=11 TO 17 S 6:FOR J=8 TO 14 STEP 6:LOCATE 9 10 完成 か ひど うか 調べ る 
1:PRINT CHRS(P): PePI:NEXT 3.1:LOCATE 11.14:PRIN NT MT "ET :RETURN すす 1 も う 1 度 や る 

| _ 議 ( 12-19 まわ す 

20 パズル の 表示 


周 チ エッ クボ ポイ ンド 


(@⑳) 本 ま 3 で も 、 ま 数 の 入力 は こち ら か ガ ら 
遊び 万 格 ず 動 する の で は な こ 、 最 初 は 1 の 
こつ 久 w 時 ll 導 の 科 な PJ 、、 7 バズ ルカ ら 始 め て 、 だ ん だ ん 増 

0 江 り 方 )” や し て いき 、 実際 に 何 手 で 解い 
20 ス 220 はじ の に ナン デノン ダダ スズ 万 ガ が 。 な か の 差 の 合計 が 、 あ る 程度 だ 
ニ ……」 と きい て くる の で 1 一 15 の 数 ちち 練 よ まつ だ ら ゲ ー ム オー バー、 な ー 

や 習 つ "ん て いう の だ と も つと エキ サイ 
っ も き 学 要 と シ の テ お し と に し ちゃう じゃ ない ガ な 。 
nh 5 か 雑 入力 の だ め の INPUT 文 が う 
ーー/ ら " まこ ご 消さ れ て いな いけ ど 気 に な 
『 こ ムー る 人 は ら 、9、11 行 の 頭 に GOS 
lm 信子 S を 入れ よ うぅ 。 最低 その 手数 で で きる 問 UB3 の を 入れ て 、 
1 は この 題 が 出 て くる よ 。 動か し 方 は "al1* と 入 3 の LOCATE 3. 2: 
が ん て 力 する 上 、 画 面 の A を 中 心 に し た 4 マ 426 

いて P Sien 

ョ いい C 2 003 の 1 行 を 加え れ ば OK だ 。 
W で を 8 S82 人 か いる の マス a9 が らし 9 マス 。 D。 (フー) 
] *56 c、d も 同様 で 、e は 回 り の パネ ル が ズ 
「_ 上 メソ ン ほ ま 。。 レ て いく の だ 。 リ プレ イ は IYJ キ ー。 


nm ea 


表 較 葵 、 綿 一 い ゆ み に は 、 ち よ つ と 物足りな いな あ ……。 な あー ん ちや ゃ つて 。 見 栄 を 張 つ て み だ り し て 。 も う 少 し マス を 多く し て 16 ぐ < 4 
Ao の 打つ い に し ち ゃ うと か が 、 3 色 そ れ ぞ れ の 色 の マス を も っ と ちら ば す と か 、 が ん ば つて ほし い 作 品 だ な あ 。 期 待 し て いま す 。 


ミサ イル 誘導 で 敵 を や っ つけ ろ / ノ 


Y 変え る の で (た だ し 20 面 まで )、 う まく 

遊び 万 コツ を の みこ ん で て 戦 お う 。 
20XX 年 、 空 か ら 恐 居 の 大 王 が 攻め て 英 が 爆弾 を 落と し て くる と 、 左 に D 
きだ た 。 キミ は 地上 基地 か ら 、 [214I6I8| と 表示 され る (Danger の 略 )。 爆弾 は ミ 
で 照準 を 操作 し て 、 ス ペー ス ・ キ ー で サイ ル で 撃ち な と すし か な い の だ けれ 
ミサ イル を 撃っ て くれ 。 周 準 を 動か す と 、 ふ つう の や り 方 で は と て も 照準 を 
と それ に あわ せ て ミサ イル も コー ス を あわ せる ひま が な い 。 そこで 、 シ フト 
・ キー を 押す と 照準 4 左 の し は 面 数 、 そ の 下 は 基地 の 残り 数 。 


Ln - 
せる こ が 一 気 に 下 に ' 下 が 
IP 巻 そ て 英 あ し う % ゐ 2 0 
明 3 に ) \ に, で ア 時 が 4 れる ぞ 。 
て 編 11 そ 速 口 EAIMEAM 
人 集 月 こ 屋 グミ 左 の 表示 に B(Bo- D 
ls ら 部 7 て が う 』 2 UWN 
げに し ンタ 8 nus) が 出 て いる と き 
f ツガ 

ョ は 日 ン る D 』 は 敵 を や っ つり る と 議 哲 生 
『 、 か 條 で 面 A 』W ボー ナス プラ ス 。 50 

4 に : H 全 
H に 決 テ ス 00 点 ご と に 基地 は 1 OR 
と は け 行 し キト 骨 
1 888 SN (W 
| の 
た 曜日 ss% 。 | た が さき は T (人 昼 ) の 2 倍 の 009833 
の 日 が 29 が もい 使 せ 邊 ロコ - 
ョ に た 委 と を て 得点 に な る 。 リ プレ 

ぅ か 京 ー * 、 5 
CGCCCCCCCCC ここ ここ 7 イ は hn 以外 の キー。 4 よう つや ぐ 敵 に 晃 準 が 追 いつ い だ 。 すばやく 攻撃 / 


19 OUT 194.9:SCREEN 9,3:CLS 3:SCREEN ,9:DEFINT A-Z:RANDOMIZE VAL(RIGHT$(TIME も , 2 ) 
) 
29 DIM TEKI(176) ,BOM(72),CUR(16) ,BHAI(7),THAI(16),SUZI(129 ) 
39 FOR TO 176:READ A$:TEKI(I)=VAL("&H"+A$):NEXT 
49 FOR TO 72:READ A$:BOM( 1 )=VAL("&H"+A$ も ):NEXT 
S9 FOR TO 16:READ A$:CUR(1)=VAL("&H"+A$) :NEXT 
69 FOR TO 7:READ A:BHAI(I)=A:NEXT:FOR I=9 TO 16:READ A:THAI(I)=A:NEXT 
79 FOR TO 129:READ A$:SUZI(T)=VAL("&h"+A$) : NEXT 
89 READ SX,SY,LC:POINT(SX,SY):IF SX<9 THEN XSTART 
99 READ EX,EY:IF EX<9 THEN 8 ELSE LINE-(EX,EY) ,LC:GOTO 39 
199 xSTART 
119 SPX=525:SPY=115:SU! =HSC! : GOSUB wSU.PUT : SPX=35:SPY=79: ASU! =ALO:SCENE=1:SU!=SC 
ENE : AL0=SCENE : GOSUB xSU.PUT:ASU! =SC!:SU!=9:SPX=525:SPY=159:GOSUB wS5U.PUT:ASU!=1: 
BAL=5:SU!=BAL:SPX=35:SPY=89:GOSUB xSU.PUT 
129 LINE(199,9)-(599,169),7.B:LINE(191,1)-(499.159),1.BF 
139 CIRCLE(399,169) ,59.7.9.3.14159, .25:T$=CHR$( &HAA)+CHR$( 8&H55 )+CHR$(&H55 ) :PAINT 
(329,159 ) ,T$,7 
149 MX=399:MY=59:TX=479:TY=59:THAN=1:TBI=6:TB=1:BICHI=1:BONUS= 1 :CMX=9:CTX=9:SC!= 
9 : SBHAN=9 : TNH= 1 : CSPH= 1 : SHO=9 :MCU=9:TCU=9:BCU=9 :COLOR=(2.9):COLOR=(4.9):COLOR= (3, 
9 ) 
159 xMAIN.LOOP 
169 IF INP(9)=191 AND BICHI く <2 THEN BEEP 1:SBHAN= 1 : AMX=MX: AMY=MY 
179 IF SCENE く 29 THEN AMX=MX:AMY=MY 
189 BEEP 9@:IF SBHAN=1 THEN ON TB GOSUB SHOT . BOM , xANT T . BEEM 
IF BICHI=1 AND SCENE く 29 THEN FOR 1=9 TO 199-SCENEx5: NEXT 


ーー ルー ルー 
ああ 避 


うー ん 。 わ り と 、 お むず か し いな あ 。 ね らい を つけ て 、 が ん ば つて みた だ ん だ けど 、 な か な か あたら な いん だ 。 悲 しい! あ だ つ 
だ と 思う つて も あ だ つ て いな い の よ ね エー。 そ この と ころ が 微妙 すぎ て 、 ち よ ょ つと わか り に ぐい 気 が す る な ぁ 。 


299 IF INP(9)=191 AND MX<482 THEN MX=MX+16 い 
219 IF INP(9)=239 AND MX>119 THEN MX=MX-16 る 
229 IF INP(9)=251 AND MY<159 THEN MY=MY+8 と 
239 IF INP(1)=254 AND MY>8 THEN MY=MY-8 ボ 
249 IF CMX>9 THEN PUT(CMX ,CMY ) 、CUR | 
259 PUT(MX.MY ) 、CUR:CMX=MX:CMY=MY 2 
269 ON THAN GOSUB xTEKI .1.%XTEKI .2 4 
279 IF TB=2 THEN GOSUB XTEKI .BOM 得 
289 GOTO xMAIN.LOOP 5 
299 xTEKI .1 oO 


399 IF TRL=1 THEN TX=479-(TX-109) 

319 TX=TX-29:IF TX<149 THEN TX=479:TY=RNDx149:TCU=TCU+1:1F RND>.S5 THEN TRL=1 EL 
SE TRL=9@ 

329 IF RND>.5 AND TY>5 AND TY く 149 THEN TY=TY-S5+RNDx109 

339 IF TRL=1 THEN TX=479-TX+109 

349 IF CTX>9 THEN PUT(CTX,CTY) ,TEKI(THAI(16)) 

359 PUT(TX,TY) ,TEKI(THAI(16)):CTX=TX:CTY=TY 

369 IF BICHI>1 OR TX<299 OR TX>369 OR TY>119 THEN RETURN 

379 IF SCENE>14 AND RND>.2 THEN TB=2:COLOR=(2.2):RETURN 

389 IF SCENE<15 AND BON=9 AND RND<SCENE/29 THEN TB=2:COLOR=( 22 ) 

399 RETURN 

499 XTEKI.2 

419 TY=TY-19:1IF TY<5 THEN TY=149:TX=RNDx339+149:TCU=TCU+ 1 

429 IF RND>.3 AND TX>159 AND TX<479 THEN TX=TX-19+RNDx20 

439 IF CTY>9 THEN PUT(CTX,CTY) ,TEKI(THAI(TY/19+1 ) ) 

449 PUT(TX,TY) .TEKI(THAI(TY/19)):CTX=TX:CTY=TY 

459 IF BICHI>1 OR TY<59 OR TY>199 THEN RETURN 

469 IF SCENE<11 AND BON=9 THEN IF RND<SCENE/19 THEN TB=2:COLOR=(2.2):RETURN 

479 IF SCENE>19 THEN IF RND>.3 THEN TB=2:COLOR=(2.2):RETURN 

489 RETURN ' 

499 xTEKI .BUOM 

599 TBX=TX-(TX-299)/6x(7-TBI):TBY=TY+(149-TY)/6X(7-TB1 ) 

519 IF TBI<6 THEN PUT(CTBX ,CTBY ) , BOM(BHAI(TBI+1) ) 

529 PUT(TBX.,TBY ) ,.BOM(BHAI(TBI ) ) :CTBX=TBX:CTBY=TBY 

539 TBI=TBI-1:IF TBI>9 THEN IF INP(8)=191 THEN MX=RNDx200+209:MY=125:RETURN ELS 
E RETURN 

549 PUT(TBX.TBY ) 、BOM(HAI(TBI+1) ):TB=1:TBI=6:COLOR=(2.9):ASU!=BAL:BAL=BAL-1:IF B 
AL く 1 THEN COLOR=( 1 ,2) :BEEP: BEEP : BEEP:GOTO *GAME.OVER ELSE COLOR=(1.2):BEEP:SU!=B 
AL:SPX=35:SPY=89:GOSUB xSU.PUT:COLOR=(1.ABS(TNH- 2) ) :RETURN 

S559 XSHOT . BOM 

569  BX=299+(AMX-299)/6xBICHI:BY=149+(AMY-149)/6xBICHI 

579 IF BICHI>1 THEN PUT(CBX ,CBY ) , BOM( BHAI(BICHI-1 ) ) 

589 PUT(BX,BY ) ,BOM( BHAI(BICHI ) ) :CBX=BX:CBY=BY:B1CHI=BICHI+1 

599 IF BICHI=7 THEN PUT(BX.BY ) 、BOM( BHAI(BICHI )) :SBHAN=9:BICHI=1:BCU=BCU+ 1 ELSE 

RETURN 

699 IF BX<TX OR BX>TX+29 THEN RETURN 

619 IF BY<TY OR BY>TY+19 THEN RETURN 

629 PUT(MX,MY ) ,CUR:COLOR=(2.2):BEEP:FOR 1=1 TO 21 STEP 2:BEEP 9:CIRCLE(TX+19、TY 
+5) ,1.2:BEEP 1:NEXT 

639 PSET(TX+19.TY+5).1:FOR 1=1 TO 22:BEEP 9:CIRCLE(TX+19,TY+5) 1.1:BEEP 1:NEXT : 
BEEP 9:COLOR=(2.9) 

649 MCU=MCU+ 1 : AB=9:TX=479:TY=RNDx139+19:CTX=9:CMX=9:SCENE=SCENE+1:ASUI=SCIEIF S 
CENE MOD 2=9 THEN THAN=1 ELSE THAN=2:CTY=9:TY=149:TX=RNDX339+140 

659 SC!=SC!+AB+INT(BONUSxRNDx19+19)xTNHxTHAN:SU!=SC!:SPY=159:SPX=525:GOSUB XSU、 
PUT:SU! =SCENE: ASU! =ALO:SPX=35: SPY=79:GOSUB xSU.PUT:ALO=SU!:TIF RND>.6 THEN BON=1: 
BONUS=(RNDX19+19)xSCENE:COLOR=(3.3) ELSE BON=9: BONUS=1:COLOR=(3,.9) 

669 MX=295:MY=119:IF RND>.6 THEN COLOR=(1.9):COLOR=(4.4):TNH=2 ELSE COLOR=(1.1) 
・COLOR=(4.9):TNH= 1 

679 IF INT(SC!/5990 ) >SHO THEN ASU!=BAL:BAL=BAL+INT(SC!/5999-SHO):SPX=3S5:SPY=80: 
SU! =BAL:BEEP 1:GOSUB SU.PUT:BEEP 9:SHO=INT(SC!/5999):RETURN ELSE RETURN 

689 xANTI .BEEM - 

699 IF MX+25<TBX-8 OR MX-35>TBX-8 THEN RETURN 

799 IF MY+15<TBY-5 OR MY-15>TBY-5 THEN RETURN 

719 COLOR=(6.,.2):BEEP:PUT(TBX 、TBY ) , BOM( BHAI(TBI+1)):TB=1:COLOR=(6.6):SBHAN=9:TBI 
=6:COLOR=(2.9):AB=AB+2 


729 RETURN 

739 xSU.PUT 

749 FOR Is=SPX TO _ SPX+45 STEP 9 

7S59 IF CSPH=1 THEN PUT([,SPY ) 、SUZI(13xVAL(MIDS(RIGHT$ も ("999999"+STR$S(ASU! ) .6 ) 


(ニー5PXX)/9+1 。1)) ) 

760 PUT( I ,SPY ) , SUZI(13xVAL(MID$S(RIGHT$( "99999"+STR$S(SU!)、6),(T-SPX)/9+1 、1 ) ) ) 
779 NEXT 

789 RETURN 

799 XGAME . OVER 

899  X$=INKEY$:[F X$ く >"" THEN xGAME.OVER ELSE FOR 1I=9 TO 7:COLOR=(I、I):NEXT EREST 
ORE XYN.DATA 

819 READ SX,SY:POINT(SX、SY):IF SX く 9 THEN 839 

829 READ EX,EY:IF EX く <9 THEN 819 ELSE LINE-(EX,EY):GOTO 820 

839 CSPH=9:SU!=INT(MCU/BCUX1099 ) :SPX=275:SPY=89:GOSUB %SUJPUTESU!=INT(MCU/ZTCUX1W 
9):SPX=275:SPY=99:GOSUB xSU.PUT : CSPH= 1 

849  X$=INPUT も (1):IF X も ="n" THEN WIDTH 89.25:END 


本 ミ エット /W 大 学 、 騙 集 5 で て 、 と も に 私 の 先輩 に あたる T さん (特に 名 を 秘 す ) は 、 大 学 祭 と 締切 ひ り が か さ な り 、 締 切り 下 長 に 大 協力 を し 


て これ まし だ 。 み ん な で な じろう 他人 の 失敗 、 ひ だ すら 陣 そ う 自 分 の 失敗 (エイ キチ ) 


さき (% 引 護 は OfHRTA 


送 /O8g- つ ge ン ング 


ナー) 


\ ヶ 
\ 


ldRmOm い DO の 主計. 穫 dmO 避 SHY 半 NINE ロ NL へ 環 避 と MIN ロ と 中 す 三 きす へ) へ 


SHOT DOWN の 続き 


859 IF SC!>HSC! THEN ASU! =HSC! :HSC!=SC!:GOTO xSTART ELSE ASU! =HSC! :GOTO xSTART 

869 DATA 1E,F,199,9,199.9,199.9,399.89,.399,89,399,89,299,89,399,89,299,89,399,89 
9869,799・C9・699・C9・799 ・C9 599 ,49 690 C9,599,49,F99,E9,F99,E9 、F9,E9,1D 
9 79 

879 DATA 1F99,F9,1F99,F9,2E99,E8,3E99,F8 ,2F99 ,E8 , 4B99 ,A4 ,7B99 ,BC, 4F99,E4, 8F99,E2 
,FE99,FE,8E99,E2.F91 ,E1,FE91.FF,E91,E1,F792,.89DE,FE93,89FF,FE93,89FF,1F99,F9,1F9 
り 9.。F9,1F99,F9,9,9,799,C9,299、89,9 

989 DATA F,8,1 ,1 ,1,8992,8993,8992,8993,8992,8993,4995,C996,4995,5915。791D,D917,C 

827,F83E,C826 ,D457.FC7E,FC7E,9,C997 ,8992,9 

899 DATA 8,4.898.1C98,1C14,3E2A,552A,5D7F,9 

999 DATA 14,A,BC99, 199,49,4991 ,299,BF,4995,599,49,F79A,15C9,78,7815,1599,E9AD,56 

2<B,2B99 ,AE,572B,56F9,AA,5657 ,5599,F9AD,562B,2B99,AE,F72A,15E9,78,7815,1599,C95F。 

A99A,A99,A9,793,499,F8,5697,9,BC,4991 ,199,49,9 

919 DATA 14.A,5C91 .9.9,A999,599,7F,9,299,89,AF9A,89,9,5995,1599,E97F,9,2A99,89,A 

BZ2A,F9,9,5455,5599,.F957,9、AA99,A8,BB2A,E9,9,4455,1599,C96F,9,2A99,99,BF9A,89,9,4 

995、199.5F,9,299,A9,9 

929 DATA A,5,17.9,28,892B,9,54,C957,9,A8.892B,9,54,17,9,28,9,6,4,79,B899,4999,79 
9.9,5.8,8,8.8.8,8.89FF,89FF,89FF,8.8,8.8,8.8,.9,9,48,48,66.66,66,66,9,9,9,9,9,93 
,93,93,93,93,129,129,129,129,129,999,129 

939 DATA 6,7,7878,.8478.8484,8C8C,B48C,B4B4 ,C4C4 , 84C4,8484.7878,78.6,7,1919,3910, 

3939 ,5959,1959,1919,1919、1919,1919,7C7C,7C,6.7,7878.8478,.8484,494,1894,1818,6969 
>6969,8989,FCFC,FC 

949 DATA 6,7,7878.8478,8484,494,3894,3838,494.8494.8484,.7878,78.6,7,898,1898,181 

8,2828,.4828,4848,FCFC, 8FC,898 ,898,8,6,7,FCFC,89FC,8989,F9F9,8F9,898,494,8894,888 

8 .7979,.70 

959 DATA 6,7,3838, 4938 , 4949,8989,F889,F8F8 ,8484,8484,8484,7878,78,6,7,FCFC, 84EC, 

8484.808,1998,10919,2929,2929,2029,2929,29,6,7,7878.8478,8484,8484,7884,7878,8484 
,8484.8484.7878,78.6,7,7878.8478.8484.8484,7C84,7C7C,494,894,898,7979,75 

969 DATA 525,39,7,515,39,515,35.525 ,35,525, 49,515,49,-1,9,529,39,7,529,49,529,35 
, つ 39.35,539,.39,539 ,49,-1,9,543,39,7,543,、49,553,49,553,39,543,39,-1.9,557,39。7,56 

7,39,563.39,563,49,-1.,9 

379 DATA 515,.43.7,522.43.525,46,525.59,522.53,515,53.515,43。-1,.9,529,43,7,529,53 

ぅ 539.53,539,43.529,43,-1.9,.543,43.7.545,53.548,43,551 ,53,553, 43,-1,9,557,53,。7,55 

7,43.567 .53,.567,43,-1.,9 

989 DATA 539,199.7,539,195,539,193,.549,193,549,199,549,195,-1,9,569,199,7,559,19 

9,559,192.569,192.569,195.559,195,-1.9,569,135,7,559,135,559,137,569,137,569,149 
5559.149,-1.0 

999 DATA 22.79,7,22.75.32.75,-1.9,35,199,1,45.199,49,199,49,195,-1、9,35,129,4,35 

115,45,129,45,115,-1.9,35,139,2.42,139,45,131 ,45,134,42,135,35,135,35,139,-1.,9。 

34。147,3,34,145.42.145.44.146.44.147.34,147,34,159,42,159,44,149,44,147,-1.9,-1 。 

9 ,9 

1999 xYN.DATA:DATA 289,119,285,112,299,119,285,112.285,115,-1.9,395,119,295,115, 

-1.9.319,.115,319.119.329,115.329,119,-1,9,-1,9 


男 変 数 リス ト 
TEKI…… 敵 の PUT デ ー タ 

BOM・… 爆 弾 の PUT デ ー タ 
CUR…… 明 準 の PUT デ ー マ 


BHAI…… 爆 弾 の 読み だ し 位置 : 
: THAN…… ど ちら の 瑞 を だ す 


THAI…… 敵 の 読み だ し 位置 
ら UZ|…… 数 字 の PUT デ ー タ 


SPX,SPY,SU/.ASU/.O・ 
・ SBHAN…… 自 分 が 爆弾 を 刺 


SPH-…… 数 字 の 表示 に 使用 
HSC 7 …… ハ イス コア 


SCENE…… 面 数 
ALO…… 前 の 面 数 
BAL …… 下 り 自 機 数 
BICHI…… 爆 纏 の 大 き さ 


剤 の 座標 


・ TBX.TBY…… 敵 爆弾 の 座標 
・ OCTBX.CTBY…… 前 の 敵 爆 


当 の 座標 


か 
TB…… 英 の 爆 剥 の フラ グ 


つて いる か 


・TNH…… 昼 か 夜 ひ の フラ ブ 
・ ら HO…… 基地 を 増やす か どう 


が の 判断 に 使用 


・ MCU……… 命 中 し た 爆弾 の 数 
・ TOCU……… 出 だ 敵 の 数 


・ CBX.OBY…… 前 の 自分 の 爆 ・ 弄 プ ロブ ラム の 説明 


10 初期 設定 


込み 
60 一 140 画面 設定 


・ 150-280 メイ ン ル ー チ ン (・ 
準 の 和 動 、 攻 撃 、 各 : 
ルー チン へ の 分 岐 な ・ 
・ 画面 に LINE 文 で 線 を 引 こ こと 
・ に よっ て 行っ て いる ん だ けれ ど 、 


ご) 


・290-390 敵 り U り FO ル ー チ ン 
・ 400 一 480 敵 フ ァ イ タ ー ル ー チ : 
・ 使 つて 画面 を 作る バー ジヨン も 
・ 送っ つて き て いる 。 ご これ は 表示 も 


で や 


の 


・ 490~540 仙 の 爆弾 ルー チン 
・ 550-670 自分 の 攻撃 ルー チン : 
・ 680-720 迎撃 ビー ムル ー チ ン : 


・ し て し まう こと が ある 。 次 の 行 
・ を 入れ れ ば OK だ / 

20- 70 PUT 用 デー タ 読 み : 
・ の) 一 (5 の 9 の. 1 6 の) , 7 


635 LINE (1 の 6 の , 
> 
636 (⑪30 行 と 同じ ) 
まだ この プロ グラ ム で は 、 画 
面 の 表示 を 全て 、 プ ブラ フィック 


作者 の 柳田 君 は 、 漢 字 ROM を 


きれ いで 親切 だ し 、 リ スト も 短 
い 。 ご ちら の リス ト が ほし い 人 


TB | …… 敵 の 爆弾 の 大 き さ ・ BCU…… 撃 つ だ 爆弾 の 数 ・730 一 780 数 字 の PUT ・ は ポシェ エッ ツ ト 編 集 部 SHOTDO 
BONUS…… ボ ー ナ ス ・「RL…… 英 の 進行 方 向 フラ ブ : 790-850 ゲー ム オ ー バ ー 処 理 ・ WN 漢 字 ROM 版 希望 係 に 返信 
MX.MY…… 準 の 座標 ・ AB…… 迎 撃 ビ ー ム の 得点 ・860-920 キヤ ラク 用 デー ・ 用 の 切手 と 封筒 を 同封 し て 申し 


CMXACMY…… 前 の 照 準 の 座 ・ 


標 


AMX.AMY …… 爆 弾 を 撃つ だ 
と き の 婦 準 座 : 


標 
TTY…… 英 の 座標 


CTX.OTY-…- 前 の 敵 の 座標 : 
BX.BY……… 自 分 の 米 弾 の 座標 


BON ポー ナス ステ ー ン シカ か 
の フラ グ 
SGY…… ポ イン ト 指 定 座標 
AA 選 YSon ラ イン ドド 語 本 


・ 930950 数 字 用 デー タ 
・ 960990 文字 用 デー タ 
・1000  。 ゲー ム オ ー バ ー 時 の ・ 


表示 用 デー タ 


・ 還 チェ エッ フ ボ イン ト 
この プロ グラ ム で は 、 敵 の 位 ・ 
・ 置 に よ つ て 、 敵 へ の 攻撃 が 成功 ・ 
・ し た と き 、 時 々 、 枠 や 基地 を 消 ・ 


込ん で ぐれ 。 (漢字 ROM ガ な い 


・ と だ め だ よ ) (フー) 


2 の っ トー 
家人 9 


拝 旨 シャ ヤー プ 様 …。MZ-700 に 付い て いる プロ ッ タ プリ ンタ ー は 、 な ぜ 一 部 の キヤ ラフ ター が で な い の で すか 毎回 切り 
張り に 苦し む 一 人 の 編集 部 員 よ り 。 


どこ まで 続く 、 恐 怖 の マラ ソ 


19 DEFINT A-Z:CONSOLE .,@.1:MIDTH 86.25:DIM A(13),B(13),D(13),E(99):LOCATE 9,9:P ! 


RINT"SCORE":SPC(19):" く < く WAR >>":SPC(15)1 "タイ リョ ク ": 下 3:ON ERROR GOTO 136 
29 FOR 1=9 TO 13:READ Z$:A(I)=VAL("&h"+Z$):NEXTFOR i9 TO 3: Z$:B(I)=VAL(" 
&h"+Z$):NEXT:CLS 2:GET(6.9)-(7.7).D:A$="999":X=624:G=175:N=169:COLOR=(5.9) 

39 DATA 8,8、3C3C、3C3C,3C3C,9898 ,FF98、FFFF,1919,EC19,ECEC,8686,C386,C3C3,8,8,3C9 
,・3C,3C3C,1989,19、FFFF.9899,98,1717,2199,21、C3C3:LINE(9.175)-(639,175),5:PAINT(1 , 
188),A$,5:FOR 1=1 TO U:PUT(Ix11+273.99) 、A,PSET:NEXT:F=167:COLOR=(1,4):GOTO 12 
46 IF N<9 THEN 149 ELSE IF INP(1)=254 THEN 199 ELSE IF INP(9)=191 THEN 118 


59 I=INP(9):IF !=255 THEN 69 ELSE PUT(X,F) ,D、PSET:X=X+(1= =239)x8: IF POINT(X+4。 10 ] 


)=6 THEN 149 ELSE IF POINT(X+4、178)=9 THEN X=X+8 


69 PUT(X,F) .A、PSET:P=RNDxT:IF E(P)<9 THEN E(P)=E(P)+8・ GOTO 49 ELSE PUT(E(P), FE), p ー 


,PSET:E(P)=E(P)+8:IF E(P)=X THEN 149 ELSE IF POINT(E(P)+4,178)=9 THEN 89 
78 IF E(P)>X+39 OR E(P)>696 THEN 9 ELSE PUT(E(P) F),B,PSET:GOTO 48 
88 PUT(E(P) ,G) ,.B,PSET:S=S+5:FOR =1 TO0 59:BEEP 1: BEEP 9@:NEXT:・ by Kazuhiko 

_98 R=RNDx5:E(P)=-8xR:BEEP 1:BEEP 1: BEEP 1: BEEP @:GOTO 126:′ Ochiai 


196 FOR J=1 TO 9 STEP -1:FOR I=9 TO -61 STEP -3:W=(SIN(I/16))xl6+163:V=XtI+3:BEE 
=N-5:FOR I=9 TO TEIF EH)X- | 


P 1:PSET(V.W) ,J:BEEP 9:NEXT !I,.J:PUT(X-64、G) , ,D,PSET: 
64 THEN S=S+16:P=I:BEEP 1:BEEP 9:PUT(X-64,F),D,PSET:GOTO 98 ELSE NEXT:GOTO 129 


116 XsX-16:FOR I=1 TO 9 STEP -1:BEEP 1: PUT(X+Ix8,F- Te8)。 A,PSET:BEEP :NEXT:FORI 


=1 TO 8 STEP -1:BEEP 1:PUT(X+ix8+8.G-16+Ix8) ,D,PSET: BEEP 9:NEXT・ NsN-16 
129 LOCATE 15.9:PRINT S:LOCATE 64,.9:PRINT Ni" TE" ん "GOTO 49 昌 ( 
139 S=S+N:T=T+1 :C=RNDx6+1 :COLOR=(6,C) :RESTORE: BEEP に RESUME 20: きす サ 
149 BEEP:IF U>9 THEN Ns19g:X=624: PUT(Ux11+273, 99) ,D, PSET:U=U- 1 : :GOTO 129 


159 FOR !=9 TO 631 STEP 8:BEEP 1:PUT(I,F) .B,PSET:BEEP 9:NEXT:COLOR C:LOCATE 33、 2 ] 


1:PRINT"GAME OVEI 4 2FOR 1=9 TO 631 STEP に BEEF 1 JULL F), b, PSET: BEEP 1 NEXT: FEND_ 


Aa 


| を 

キミ に は 振り 返る こと すら 許さ きれ て 人 
い 。 だ だ ひび だ すら 果て し な き 道 を 中 時 
キー で 走り つづ け 、 前 か らく る 敵 を ジ 、 
司 


ャ ン フ (スペ ー ス ・ キ ー) し た り 、 手 
簡 剤 を 投げ て (8| キ ー) や っ つけ た り 
し な が ら 、 画 面 左 は じ に 到着 する か 、、 

手 樽 弾 を 投げ つけ る か し た ら 1 面 ク リ 
ア 。 ジ ャ ンプ に は 体力 10、 手 欄 弾 を 投 
げ る と 体力 5 を 使っ ちゃ う 。 残っ た 体 
力 が 面 ク リア 時 の ボー ナス に な る の だ 。 


時 f? コ 各層 酷 州 4 


置 変 数 リス ト 

A( )…… 目 分 の キヤ フン ツ 
BL ) の 敵 の ギャラ ンタ 

D( )…… 消 去 用 の キヤ ラブ タ 
E( )…… 敵 の X 座 標 


X…… 目 分 の X 座 標 

F…… 目 分 と 敵 の Y 座 標 
G…… 穴 に 落ち だ 敵 の Y 座 標 
R…… 新 し ぐ 出 て ぐる 敵 の X 座 


本 
V. W-…… 手 橿 弾 の 座標 
〇 2 敵 の 色 
中 2 面 数 
U…… 残 り の 自分 の 数 
N ce 体力 
ロ Se も 5 動 グ す 敵 
(FT スコ ア 
J…… 手 弾 の 色 
A$…… 地 面 の 色 


お …… デ ー タ 読み だ し 用 


画 プ ロブ ラム の 説明 


10 一 30 初期 設定 、 画 面 作 成 

40- 50 キー 入力 、 自 分 の 表 
示 、 難 種 判 定 

60-- 70 敵 の 表示 、 将 種 判定 


60 穴 に 落ち だ 負 理 
90 新 し ぐ で て ぐる 敵 の 
設定 
100 手 欄 弾 表示 
110 ジャ ヤ ンプ 負 理 
120 . 音 種 数 値 表 示 
130 面 ツ リア 
140 や られ だ と き の 処 理 
150 2 らら ガー リー 処理 
田 チ ェ ン クボ イン ト 
リプ レイ ・ キ ー は 、 1 画面 に 

は 収まら な いけ れ ど 次 の 行 を 加 


えれ ば 、 再 ダー ム が ガス ペー スズ ・ 
キー で で きる よう に な る 。 
16 の 9 の IF INKEY$= 
チオ 朋 反 N CGCLS 8 
6 月 、 グリ) 月 UN 到 
LSE 16 の (クー) 


。 CNWwV ポ ー ミ 当代 ささ NL 
YS さこ きき no ンコ J 消 時 


「 す 
いい 


再 ゲ ー ム は チェ ッ ク ポ ボイン ト 参 照 。 


し JI JI JI W IT 1 II 】 』I JI IM INW im 
Ne ik 


ーーーーー ー」 ^ も も し W 」 


ko 投稿 者 の 、 み な さん 1! 投稿 する 前 まえ に も う 一 度 、 英 単語 の つづ り を 確認 し まし よう 。 た と えば 、GOLE. TYP. PRGRM. .27 
曲 順 。 英 単語 に 弱い エイ キチ か ら の お 知ら せ で し た 。 


空 /O8g- ワ ge ン 用 グ ク ク 


_C.G. ソ フト を ジ > グ ソ ー バ ズル に 


に 


JOy/ 。 訪 


較 変 数 リス ト 
XD…… 横 万 向 の 分 割 DOt 数 
XA……GET す る と き の X 廊 向 
の 幅 
CP……⑦ の 1 度 の 秘 動 量 を 決 
め る 
CO…… ゆ ⑦ の 1 回 の 秘 動 量 
RA……X 亡 向 の 分 割 数 
ら ……GET「,PU「 用 の 配列 
変数 の 大 き さ 
に ( | PAT4 の だ A1 と パ "CE 
1 138 PUT(X, Y) 0 で 0 | 」 PUT 用 配列 変数 
1 GOTO 19 ュー | xyYBo…| GET PUT 時 の 
ゲラ フィ ッ ン 座標 
⑨ ル ん る の CO カー ソル 座標 
田 プ ログ ラム の 説明 
10 ビ ピコ ユー ポート 指 定 
20-- 30 初期 設定 
40- 90 グラ フィ ッ ン ク 画 面 


を バラ バラ に する 
100 テキ スト 画面 の 初期 
設定 
110<140 GET し て いれ ガ え 
て PUT す る 
和 施 び 亡 150-230 キー 入力 と カー ソル 
ww ン ー の 物 動 
前 220 "スペース が ガ 押 され 
手持 ちの C.G. を RUN き せ て 、 絵 を 描 oi ! 
き 終 わっ だら BREAK、 NEW。 そし て 、 放 チ ェ ッ フ ポ イン ト 
この 『JIG』」 を 走ら せる と CG. ジ グッ ちよ つと 単純 すぎ だ ガ かな 


まだ 奈 容 は ある の だ か ガ ら 、 イ イ 


。 ーー ム を 表示 し た の り 、 ピ ー ス の 大 き 
ー さ な ど を こつ ち で 選べ る よう に 
1 する な ど 、 ひ と ひね りほ し か つ 
ー だ 。 ビ ピース の 大 き さ は 20 行 の X 
コ 4  D の 値 を 変え よう (だ だ し 640 で 
0 一 に な る ぞ 。 2 つの ブロ ッ ク の 位置 | ポ わり 切れ る 数 に する こと )。 ま た だ 
取り か えな が ら 完 成 を 日 指す パ 二 8 と シ バズ ル を ぐず す 回 数 は 30 生 の RR 
L し ば ら て する と 左上 に ウェ ー ク 出現 。 比 ゅ 人 *O の O を 変え れ ば OK だ 。 
0 べ ト まだ 絵 に よ つ て は 100 行 の カ 

これ を カー ソル ・ キ ー で 移動 きせ 、 和 信 。 よ ギ ララ - 文 の パラ メー タ を 変え て 、 ツ 
れ か えた い プ ロッ ク そ れ ぞ れ で スペ ー プ  。 の 色 を 変え だ ほう が いい カ も ね 。 
ス ・ キ ー を 押せ ば 位置 が 変わ る 仕組 だ 。 の だ の 


! っ | 
22 エット / ず 投稿 され た プロ ブラ ム を 見 る と き に 、 い ちば ん 苦労 する の が LO 〇 AD。 と きど き 、 何 度 や つて も LO 〇 AD で き な い テー ブ が あ 
素人 1 人 プア だ り し て 大 変 な の だ 。 いつ だ つ だ か 、 昔 楽 の 入っ だ テー プ ま で あっ だ 。 それ じゃ し OAD で きる わけ な いよ ー。 


も ひと つ お まけ に CG.15 ゲ ー ム 


多 s 性 


走ら せ 方 は 『JIG』 と 同じ 。 要する 
に これ は 15 ゲ ー ム だ 。 最初 に 
ご こく る ( た だ 


:VIEW(6,9)-(639,.199):CONSOLE 9,25.9.1:MIDTH 48,25:COLOR 7:AT=6 


ol MM WM MM 8 MM WM B W M 』 見 】 


(ひで 2 潮 HNSreewAmS 計 舎 へ は 


18 CLEAR,。8HBEFF:DIM OKX(288) ,ANS(168) :RANDOMIZE VAL(RIGHT$(TIME$,2) ) :AD%=8HBFA6 


29 D$="ED73FBFF3199C82AA8BFED5BA2BFF396199E32C5E5D5D35CCD45BFD1E1C1C5ESD5D35DCD4 
5BFD1E1C1C5E5D5D35ECD45BFE111589919E319D1C1D28D6D35FED7BF6FFFBC97E12AF77231319F 
8C9":FOR =8 TO &H4D:POKE I+8&HBF89,VAL("8H"+MID$S(D$,Tx241.2)):NEXT 
36 FOR 1=1 TO 199:ANS(1)=I:NEXT:DEF USR=8HBF99:RNK$="4454558588A8AA" 
4 IF AT=1 AND RK<7 THEN RK=RK+1 ELSE LOCATE 7,29:INPUT"Select Rank No.(9-7)":RK 
:AT=9:IF RK<9 OR RK>7 THEN 46 ELSE IF RK=9 THEN AT=1:RK=1 
59 XV=VAL("&H"+MID$(RNK$,2xRK-1,1) ) :YV=VAL("&RH"+MIDS(RNK$,RK2 1 ) ) :SX= 649YXV: SY= 
286\YV:DEF FNX(X)=((X-1) MOD XV)xSX\8+FIX(X/(XV+. 1 ) )*89xSY:X1=SXx(XV-1):Y1=SYX(Y 
V-1):X2=X1+SX-1:Y2=Y1+SY-1:N=XVxYV:NULL=N:GET@(X1,Y1)-(X2,Y2),0K%:CLS 
69 LOCATE 9,24:PRINT"PUSH ANY KEY TO START !":POKE 8HBF19,SX\8:POKE &HBF12.5Y 
79 A$=INKEY$:IF AS<>"" THEN CLS:OUT 164.6:BEEP ELSE NEMS=INT(RND(1)x4+1)x2-5:IF 
NEWS=-OLD THEN 79 ELSE OLD=NEWS:GOSUB 196:GOTO 79 | 
86 KY$=INKEY$:IF (VAL(KY$) MOD 2) <>9 THEN 89 ELSE KYsVAL(KY$)\2:IF KY<1 OR KY>4 
THEN 8 ELSE NEWS=-(VAL(KY$)-5):GOSUB 180:FOR 1=1 TO Ni:IF ANS(I) く >I THEN GOTO 8 
9 ELSE NEXT:WIDTH 49:BEEP:PUTe(X1,Y1) ,OKX,PSET:LOCATE 5.28 
99 IF AT=1 THEN PRINT" Try Next Rank !":GOTO 49 ELSE INPUT"Very Good ! Try a 
ga1n ?(Y/N) "iQ$:CLS:IF Q$="N" OR Q$="n' THEN WIDTH 89:END ELSE 49 
196 IF ABS(NEWS) く >1. THEN NEWS=-SGN(NEWS)xXV ELSE IF (NULL MOD XV)=1 AND NEWS>9 T 
HEN RETURN ELSE IF (NULL MOD XV)=9 AND NEwS<9 THEN RETURN 
116 MOVE=NULL-NEWS: IF MOVE<=9 OR MOVE>N THEN RETURN ELSE HLX=FNX(MOVE): DEX=ENX(N 
ULL) :POKE ADX,(HLX MOD 256):POKE ADX+1,&HCB+HLX\256:POKE AD%+2,(DEX MOD 256):POK 
E AD%+3,&HC9+DEX\256:CL=USR(9) :SWAP ANS(MOVE), ANS(NULL): SwAP NULL, MOVE: RETURN 


e 1 回 


ググ だ 
0 は 完成 し て 再 ゲ ー 


き 
る し ポ ょ 


が 
at で 
) 


= 坦 吉 ・ 好 知 ア < 


田 変 数 リス ト 
OK%…… ド は ず し た だ ピース 
ANS…* 正 解 の ピース 並 び 
AD%5…… マ シン 語 に 渡す デー 
_ の 格納 アド レス 
D お …… マ シン 語 デ ー タ 
RNIKODy ラ ンク デー タ 
Me ーー 選 ー に ラフ ラグ 


RK osa s "フン / 

XV,YV……X 亡 向 、Y 方 向 の 
分 割 数 

らん SGY ツ 万 向 、 Y 浪 向 1 
ビ ピース の ドッ ト 数 


YY LT の ビ ピース の 左上 座標 
X, イ の …… ビ ピー スズ の 石 下 座標 
NEWS…… ピ ー ス 秘 動 廊 向 
OLD……41 つ 前 に 動 ひ し だ 万 
向 

に Y の "on キー 人 用 以 
KY…… 入 力 文 字 に 対す る 値 
NE | ペク クラ ンク ビー の 


位置 

田 プロ グラ ハム の 説明 

10~ 30 初期 設定 、 マ シン 語 
書き 込み 

40 640 誠 

50- 60 変数 設定 、 メ ッ セ ー 
ツジ MH 力 

70 繧 を くず す 

60 ベイン ルー チン 

90 の ーー オー ソリ トー 

100 移動 が ザ で きる か の 判 

[ 断 、 秘 動 ピ ビー ス 計 算 
110 ピース 秘 動 ルー チン 
田 チ ェ ッ クボ イン ト 


「 こ ご ん な の が ほし いよ ー」 と 無 
理 を 承知 で 注文 を 付け だ ら 、 編 


細い 
。 っ 
2 
。【 
は | 
Li ム の た びに 難し く な っ て いく モー ド 。 央 82 
し H の 2 ツ 』 ご | 画 
> の ) 拉 ] 一 と * 4 る ミ ヨ F 才 = ) れれ イ 
ぉ の ノ / 00 NN が 難 度 に 比 で ズ で 作 つ ちゃ いま し だ た 。 使用 キー 
信人 サ 上 な 倒す る (7 だ と 、 な ん と 100 ピ ビー ス )。 の は 80 行 段 目 の NEWS ニ = の 後 
で | 黒い ブロ ッ ク を [2[4I6I8I で 移動 させ て 合 滞 の 一 と 外側 の ( ) を 取れ ば 逆 に な 
梁 完成 を 目指 を う 。 AN る よ 。 (プー) 

6 人 ま 』 

KK 』 II MI MI LM 「 3 

槍 ジ ェ ッ ー すく 2 上 る て 23 

POKE &HE6CB. &HF3 


お いし い お い し い ク リア の 実 
4 る も 


トー キー ェ 
当 中 


IE 


_ PPP ロ 
HH 


4 
HDCP 


4 タイ ミシン シグ よ ぐ スペ ー ス ・ キ ー を 押し て 、 上 の ジャ ン ブ 台 へ 


遊び 万 4 る こと が で きる ぞ 。 
時 1 二 い の 8 


ミ は ジャ ンプ マン ( 多 )。 カー ソル SR 2 
bea クリ ア だ 。 2 面目 は ダメ ー ジ の 実 も 動 
ヤツ スス を うか か お う 。、 スペ ー ス * 一 き 出 し て 難し く な る ぞ 。 お っ と 、 ウ ロ 
を 首 普 ば ジャ ンプ て きる けど 、 ダ メー ウロ し て いる 追い か け マ ン ( 赤 い 〇 ) に 
の 守 (CO だ あたっ て し えま っ たり 。 うつ かま らし だ いよ うに お ね / 
アッ ウト 。 左右 に 動い て いる 
ジャ ング 宮 (日 曲 ) に 
は ぶつ か っ て も だ いじ ょ う 


LC 上 CT 昌 工 


4 や り い 。 つま こ 着 地 で きそう だ 。 


ER Il NM AM MA MA MA / 


1 と 吾 ん 2 > 


上 


* 


を 


JH どー+ 
本 の こき 、 * こ さき 、 届 N 


5 
シヤ 


FEY 
名 と 刺す S 坦 症 S 聞 は び 計 沙 S と N 


S び 。( 舞 MISHH) 


| よ a 若 ゆ SN 李 軸 。 中 へ 器 or 涯 
Ne 


2 GOT0629 
ぶ だ けど 、 は ね か えさ れ た READD$: IFD$="G8"THENRESTORE999 
62080 DP PLAY"v8o5":PLAYD$ 
ハス ミ て タダ メー ジ の 夫 に ぶ X1=X:Y1=Y:D=D+1:B=B-1:IFD=21THEND= 1 
つか りや すく な る か ら ご 用 0 
8 ONCGOT099,89,79 
必 。 う まく て 、 シ ジャ ンプ の LOCATE1 ,12:PRINTMID$(B$,D,29) 
半生 和夫 LOCATE1 .7:PRINTMID$(B$,B,29 ) 
AS NO LOCATE1 .5:PRINTMID$(A$.D。29) :LOCATE1。19:PRINTMID$(A$,B,28 ) 
う 。 あ る 程度 上 に いく と 下 P=PEEK( &HC299+X+(Y+1 ) x32 ) 
、 に まじ か IFP= &HDBANDSTRIG(9)=1THENN=- 1 :H=9:PLAY"S3m3999a" 
が の 6C く の る の 6 、 ジ キン ジ H=H+ 1 : IFH= 7THENN= 1 
SE Ne IFP= 32ANDN= 9THENN= 1 
に 育 地 し て 、 また IFP= &HDBANDN= 1 THENN=9 
ス ・ キ ー を 押し て きら に 上 IFPEEK( &HC299+X+(Y-1)x32)=&HDBANDN=- 1THENN= 1 : PLAY"S1m1999c32" 
6 SS T=STICK(9) :M=9 
へ ジャ ンプ 。 飛ん で いる あ IFT=3ANDX く 29THENM= 1 


い だ も カー ソル ・ キ ー で て 左 IFT=7ANDX>1THENM=-1 


199 
2909 
210 
220 
239 
2409 
259 
269 
279 
289 
299 
3909 
3109 
320 
339 
349 
359 
369 
379 
389 
399 
499 
410 
420 
439 
449 
459 
469 
479 
489 
499 
S99 
っ 19 
S29 
ゃ 1/) 
S49 
SS59 
S69 
S79 
589 
oS99 
609 
619 
629 
639 
649 
659 
669 
679 
689 
690 
799 
710 
720 
7 3 
749 
759 
760 
779 
789 
799 
8090 
819 
829 
830 
840 
859 
869 
879 
880 
899 
999 
910 
920 
930 
949 
950 
969 
979 
989 
999 


息 ア 
人 


X=X+M:Y=Y+TN 

P=PEEK( &HC200+X+Yx32 ) 
り =PEEK( &HC299+X1+Y1x32 ) 
IFJ=&HDBORJ=&H4FTHEN240 
LOCATEX1.Y1EPRINT "の: 
IFP=&H4FTHENGOSUB439 
IFP=&H85THENGOSUB369 
LOCATEX, YEPRINT" 邊 り バ 


V1=V:Wl=W = 
V=V+ 1 E ァ の 節 を 
IFV=9THENI=1:V=V+1 A ら 0) 
IFV=21THENI=-1:V=V+1 人 名 

IFH= 1THENW=W+SGN(Y-W)x5:IFW=- 1THENW= 4 い に に 


LOCATEV1.W1:PRINT" “ 

IFPEEK( &HC299+V+Wx32 ) =&H83THENGOSUB430 
LOCATEV,W:COLOR3:PRINT "0" 5 ECOLOR2 
GOTO0209 

N= 1 
L=L+1:S=S+199:LOCATE25.8:PRINTSi : 
PLAY"S3m5999C32f" 
IFL=19THENC=C+1:LOCATEX,YEIPRINT" “ 
RETURN 5 
IFC=4THENS=4999:GOTO379 

GOTO819 
K=K+16:LINE(K,144)-(K+4.152) ,9,BF 
LOCATEX1JY1EPRINT" の 5 
FORA=9TO19:COLOR4:LOCATEX、YE:PRINT TO" 

PLAY "Ss3m899C32" 

COLOR2:LOCATEXJ。YEPRINT "TO" ぶ 

NEXT 

X=19:Y=14:N=9:H=8 

LOCATEX ,Y:PRINT " 

IFK=232THEN5309 

RETURN 

IFS>HITHENHI =S 

LOCATE25.4:PRINTHI: 

LOCATE6 .8:COLOR4:PRINT "GAME _ OVER" ? 
LOCATE5,12:PRINT "リフ レイ  y く >n "1 ECOLOR2 
PLAY"t259v9":PLAYE$,F$:PLAYE$ ,F 和 も: PLAYE も $,F$ 
C$=INKEY$:IFC も =" "THEN589 

IFC$="y "THENS=9:C=1:K=184:GOTO780 
IFC$= "n "THENSCREEN1 , 1 .1:CONSOLE , , 1 。 
GOTO580 
CONSOLE9, 16.9.9:SCREEN2 , 1 1:COLOR1 .9,1:CLS 

E$= "vV8o6e64e64e64d64o5b16o6e64e64e64d64o5b16o6e64d64d64e64" 
F$="d64d64e64C64d64o5b16" 

HI=9:S=9:C=1:K=184 

A$ も = "HHHH HHHH HHHH HHHH HHHH HHH 

B$=" 0 0 0 0 0 0 0 0 0 0 “ 

PR INT "HHHHHHHHHUHHHHHHHHHHHHH" 

FORA=9TO013 

PRINTEPRINT 日 4SPC(2001 HU"? 

NEXT 

PR INT :PRTNT "HHHHHHHHHHHHHHUHHUHHHHHH "・ 
LINE(189,20)-(248,.36 ) ,7,B 

LOCATE23.2:COLOR2E:PRINT "HI SCORE" ! 
LINE(196.68)-(249.84),.3,B 

LOCATE25.6:PRINT "SCORE" 

LOCATE25.4:PRINTHI : 

FORA=25TO29STEP2 

LOCATEA,12:PRINT "人 箇 " 5 

NEXT 

LINE(8.12)-(164.176) ,1.BF 
X=19:Y=14:D=1:B=21:N=9:H=8i し = の 9:V=2:W=4: =] 

IFC>2THEN880 

LINE(20909,96 )-(236,106 ) , 9,.BF 

LOCATE25.8:PRINTS: 

LINE(189.116)-(248.132) .7,.B 

LOCATE23.19!:PRIN す ン ャ ヤン パ マ ン 
LOCATEX、YE:PRINT" 箇 "ELOCATEV, MICOLOR3:PRINT TO" ECOLOR2 
LOCATE1.5:PRINTMID$S(A も ,1.29):LOCATE1、19:PRINTMID も (A も .21 .20 ) 
LOCATE1 .7:PRINTMID も $(B も ,21、29):LOCATE1.12:PRINTMID も (B も , 1 .29 ) 
LOCATE1.3:PRINTMID も (B$、 1 .29 ) 

LOCATE2.1:PRINT" 画 画 画 画 古 昌 右 画 画  ・ 

FORA=9TO3 

LINE(192.178)-(236.178),.9.BF:PLAY"v6f32a32" 
LINE(188.164)-(249.189) ,3.B 

LOCATE24.14:PRINTC" MEN" バ 

NEXT 

GOTO20 

DATA eGI160~、"gd32432 ど 、 932 。、 98a332432 、 G8" 


IFS=50999THENS39 


し = の 9:PLAYE も SF も :GOTO410 


1:COLOR1 :CLS :END 


ロ 77 


ホブ ェ ッ 
一変 数 リス ト 
() Ss 面 数 
ご eee ae っ 上 ピ 
H 1 …… ハ イス コア 
X……: 自 分 の X 座 標 
Y…… 自 分 の Y 座 標 


M…… 自 分 の を 右 の 秘 動 量 
N…… 自 分 の 上 下 の 移 動 量 
60 追い ガ け マン の XX 座標 
W…… 追 いか け マ ン の Y 座 標 
ERR グリ ア の 実 を 取 つ だ 数 


D…… を スク ロー ル 制 御用 
B…… 右 スク ロー ル 制 御用 
田 プロ ブラ ハム の 説明 

10 初期 画面 
2090 サウ ン に 
40- 50 を 右 ス フロ ー ル 制御 
60~ 90 面 数 に より ダメ ー> 
の 実 を 動 が す 
自分 の 下降 判断 
キー 入力 
自分 の 秘 動 、 表 示 、 
判断 
270-350 追い か ガ け マン 移動 
360-400 スコ ア 
410 一 420 3 面 の リア 時 の 処 理 
430ー520 ダメ ー シ 
530-610 ゲー ム オ ー バ ー 処 理 
620 一 670 初期 設定 
680-980 画面 表示 
990 2 ノド ナー 
田 チ ェ ッ フ ボ イント 

サウ ンド 、 ア イデ ア と も な か 
な が よい ゲー ム で すね 。 

だ だ スピ ー ド が 居 い の が 欠点 
で す ひ が 、 束 こ する に は ほ は /L グ ラ 
ム ム 全 体 に わたり 改造 し な けれ ば 
な ら な いよ う で むず か が し いと 思 
いま す 。 

まだ の グー ム は けつ こう 
むず ガ が し ぐ 、 9 面 リ ア は 困難 
だ と いう 人 は 、 グ リア の 実 10 個 
を 取る と 面 の リア に な る の で 、 
390 行 の TTF L し = ニ 1 の 「HE 
N- の し の 値 を 適当 に お ガ え て み 
て ぐだ さい 。 入れ だ 数 だ け こ と れ 
ば 、 面 リア で きま す 。 

この で 、 で 0 上 うう の 8 
旧 6001 な ら 、 画面 は きれ ね いな の 
で す が 、mkKII や 6601 だ と 緑 の 痛 
景色 が 脱 け て し まい ます 。 そ の 
京 、 こす 東 を ……。 (し エイ キチ ) 


100 一 150 
150 一 160 
190 一 260 


(OOg- つ Je クシ クル ルク 


(スタ ッ フ 紹介 プ だ けち ゃ ん ・ そ の 1 ) 技術 スタ ッ フ の な か で は だ だ ひと り 、 ポ シェ ッ ト 1 号 か らい る 、 別 名 「 工作 班 班長 」。 
MSX の 増刊 を 人 作 つ た だ とき は 表紙 の 小道 具 作 り で 大 活躍 し て 美術 部 部 長 に 昇格 。 し か し 、 試 験 で 忙し こなつ だ だ め に 失脚 し だ 。 


な ん だ か 不思議 な スネ ー ク ゲー ム 


4 ゲゲゲ ッ ン / 


遊び 方 


まま の りり で うだ 。 で さ 選 の スグ ルール 
ゲー ム 。 で ち 。、 こ の な ん と な て 有紗 
な お も し ろ さ は や っ て みな いと わか ら 
が IN だ の ろう な 。 

昌和 ま うか らち 全 当 革 呈 旧 せ 芝 と 貞 そ 


《 る へ ビビ を カー ジル ゞ キー て 操作 し て 、 


毒 え ん & (*) を よ け な が ら 、 え さる (・) 
や スー パー ん えき (① ひ ) を 食べ て いこ う 。 
最初 へ どの 長き は 8 だ けれ ど 、 ふ つ 
う の ぇ さる を 10 個 食べ る か 、 ス ー フ パー を 
き を 1 個 食 べ る か する と 、 体 長 が 1 増 
な で いく (12 まで 長く が なろ だら ポー ナ 
ペア ラス 。、 は じじ め に る と っ て (に だ し 
体長 は 最初 より も 1 ずつ 短く 設定 きれ 
る ) グー あみ 続 朋 だ 。 
体長 が 0 に な っ た り 、 
えき に ぶつ か っ た WM 
1 匹 ア ウト で 、 3 匹 死 ぬ と 
ゲー ム オ ー バ ー が だ 。 


と ころ て 、 STRANGE SCREEN 1 ,1,1:COLOR 1.9,1:CONSOLE9,16,9,9:CLS:PLAY"sm5999", 
いう 多 前 の > HI=9:GOSUB1999 

と 2 の 20 が 目 SH こら 

に 見 えな い 成 長 妨害 剤 。 X=15:Y=7:CLS 


いき な り 成 長 妨害 剤 に ぶつ か つた だ 。 


4 バッ クン / これ は お いし い ス ー パ ー え さ 。 グ ゾン グン 成 長 す る ぞ 。 


JI 1 1 MI 8 8 8W 8 8W 8W W W W W W 胃 


た ら 、 急 に 何 も ちな いと ころ で へ ビ が ポ 。 『 す Ap 合図 ご 

邊 と ee ee oO 。 由 

コン と 1 つ ち ぢ ん だ ら 要 注意 / その 人 2 
の し 

見 を な いと ころ が 、 成 長 妨害 剤 の あり 1 に ASSa 

が だ - を の まま に し て いろ る と 。 あら と l 胃 は に 5 Ii 

NR RSS 『 こ R こ - 

、 右 か 左 ヘ よ け る べし Se _ 回 を 

rsidkkdipaae 半 昌 ご gs i 

| Di で は 邊 

本 eS SC sm こ 8 図 S-l 

か な い の が だ 。 1 5_ BT 
ーー コ < 

一 参考 ーー「 マ イコ ン BASIC マ ガ が ジ ま 『 。 思 人 き So 

So 層 
ン Deluxe1」『 リ バー パト ロー ル 」 1 K ご の 4 
半 間 肝 月 は は 半 8 日 昌 旨 月 捕 BB 】 


エズ エエ エズ テ エ エズ エエ エエ エズ ネズ エエ エエ エズ エエ エエ 3 
※※※ 。 STRANGE SNAKE  ※※※ 
※ 区 B y 3 
※XXMaSanOr1 KOnO( ね く “ )※※※ 
し エエ エエ エエ ズ エ エズ エエ テ エ エズ エエ エズ エエ エエ 1 


Z$=CHR$S(96 ) :Y=Y-Q 


順調 に 進ん で る と 思っ て 


"Sm59909" 


26 者 (スタ ッ フ 紹介 ン だ けち ゃ ん ・ そ の 2) その 後 、 テ フ ポ リ 11 月 号 、 ロ ー ド ラン ナー 特集 の 表紙 で 使わ れ だ 大 道具 作り で 特 活 。 
東側 AD( ア ー ト ディ レク ター) の 片野 さん に 絶 讃 され 衣 世 美術 部 部 長 と な る 。 と いつ て も 待遇 に は 変化 な し 。 仕 事 が 増え だ だ け 。 


PLAY "164". "164" 

REM ※※ 光 天光 光 区 加 3 1 1※ 光 区 革 光 区 区 区 区 
U=INT(RND( 1 )x39)+1 
LOCATEU,14:COLOR1 EPRINT "%" バ 
U=INT(RND( 1 )x39)+1 
LOCATEU,13:COLOR1 EPRINT"・ の 5 
K=INT(RND( 1 )x8)+1 

IFK く >1THEN289 
U=INT(RND( 1 ) x39 )+1 
LOCATEU、13:COLOR3EPRINMT "こぶ 
U=INT(RND( 1 ) x39)+1 
LOCATEU,14:COLOR1 :PRINTZ も ・ 
COLOR1 :LOCATE9,15:PRINT 
IFSTICK(9)=7THENX=X- 1 : IFX く 1THENX=X+ 1 
IFSTICK(9)=3THENX=X+1:IFX>39THENX=X- 1 
IFSCREEN (X,Y)=32THEN 389 
IFSCREEN (X,Y)=165THEN409 
IFSCREEN (X,Y) =129THEN599 
IFSCREEN (X,Y)=96THEN609 
IFSCREEN (X,Y)=42THEN7009 
COLOR1 :LOCATEX,Y:PRINT"U" < 
GOTO 299 

REM ※※※※※mml (SCOTC+ ] ) ※※※※※※ 区 
PLAY"o49":SC=SC+T1:W=W+1 
IFW>=19THENW=9:GOTO 599 
GOTO 359 

REM ※※※※Xmm1(SCOTG+ 1 ) ※※※※※ 
PLAY"o5cegceg":SC=SC+190 
LOCATEX,Y:COLOR1 EPRINT "UP 
Y=Y+1:TIFY>=12THEN80909 

GOTO 3669 

REM ※※※ 光 ※※※] (ソニ ザー] ) ※※※※ 区 区 
PLAY "oO3ec":Y=Y-1 

IFY く <=9THEN799 

GOTO 3769 

REM 区 ※※%X2( hO=hO- 1 ) ※※※※ 
PLAY"o2edc" :HO=HO- 1 
IFHO く <=9THEN990 

CLS:GOTO 139 

REM ※ 光 光 光 ※ 区 ホー ナス ※※※※※※※※※ 


PLAY"t12914o4cCgf16e16fe16d16e","t12914o4ecd16c16dd16o3b16o4c" 


PLAY"o4d16c16dc16o3b16o4c","o3a16916a916f169" 
CLS:LOCATE7 5:COLOR2 EPRINT " ほ ~- な す 1999 + へ 0* 1":COLOR1 
LOCATE9,7:PRINT "PUSH SPACE KEY":PLAY"t255164":HO=HO+ 1 
Q=Q+1:IFQ>=7THENQ=9 

IFSTRIG(9 )=9THEN859 

CLS:SC=SC+10999:GOTO139 

REM ※※※※※※※※ 可 AE OVGT※※ 区 光 半 基 
CLS:PLAY"t12914" "も t12914":LINE(9.9)-(255,191 ) , 2,B 
LINECG 12)=(245、1/75) 3.B 


PLAYT14) "14" ETFSC く HITHENPLAY"o414co3bago4c" ,"o3149fedc":GOT0929 


PLAY"o5cec16e16g16e16916o6c" ,"o4ege16916o5c16o4g16o5c16e" 
LOCATE9.2:COLOR 2:PRINT " 画 mWGAME OVER ! 画 斬 " 

LOCATE9,4:COLOR 1:PRINT "YOUR-SCORE : " : SC 

IFSC>HITHENH IT =SC 

LOCATE9.6:PRINT "HIGH-SCORE : "iiHI 

LOCATE9,.8:PRINT"Replay 2 (y/n)" 

LOCATE12.19:PRINT "By . ね < く ~" 

EXEC &H1958 

IFINKEY$="y "THEN1 20 

IFINKEY も =“"n "THEN999 

GOTO 955 

REIM ※※※ 光 光 区 天光 HGINO 天 ※ 革 天光 基 区 ※ 天 区 区 

FOR R=2 TO 19STEP2:FOR J=9 TO 26:IFSCREEN( J+2 ,R) =32THEN996 

LOCATEJ,R:PRINT CHR も (1 26) ・ 

FOR T=1 TO 59:NEXT:LOCATEJ。R:PRINT" ": 

NEXTJ。R:CLS: END 

REM ※ 光 ※※ 光 区 せつ めい 区 基 基 基 ※※ 区 区 区 区 区 

CLSiPLAY 125509414" "て t2550414 "COLOR 2 
PLAY"o5cedfed8c8dc8o4b8o5c" ,"o4gefde8g8f8e8d8f8e8d8cC" 
LOCATE9、9:PRINT " 画 画 ST RANGE S N AK EE 黄 下 "::COLOR1 
LOCATE2.3:COLOR3:PRINT "ーーー せ うめ い --ー-ー" 5 ECOLOR 1 
LOCATE9 , 4:PRINT "「 有 U」 = へ は ~ の か ら 5 た ~ "< 

LOCATE9.5:PRINT "「・」= ミ えさ [1 ]  :1 を へ “る と 1 せい ちょ う ": 
LOCATE0.6:PRINT "「 ニ 」= ス へ ? シャ ル え さ [ 199] : た さい る と 1 せい ちょ う ": 
LOCATE9 .7:PRINT "「※%」= と て く え さ た へ いろ る と そく し "< 


1979 LOCATE9 .8:PRINT "「 」= せ いち ょ うほ うか ヾ いさ いい : あ た へ いる と 1 ちち も": 
1989 LOCATE2.19:PRINT" (0~ は 3 0 まき: た いちょう は 、 は し い め 8)"・ 
1999 LOCATEO 。11:PRINT "(た いち ょ う 9 て ^ へ 0^ か か し に 、 12 て ~ ホ ^- ナ ス ) ": 
1199 LOCATE8.12:PRINT" [くく] カー ソル [ >] に 
1119 LOCATE7.14:PRINT"PUSH SPACE KEY ! "|: 
1129 IFSTRIG(9)=9THEN1119 
1139 RETURN 
き ェ ッ ピ 


変 数 リス ト 
H 1 …… ハ イス コア 


の ーッ クト 数 
お …… 成 長 防 害 剤 の キヤ ラノ 
W…… え さ を 取 つ だ 数 


ば /O09- つ Je ククル シク 


一 プロ グラ ハム の 説明 

100 て 130 初期 設定 

140 が テク ド 

200 て 390 メイ ン ル ー チ ン 

400ー420 えさ を と つ だ と き の 
判断 

500 て 530 スペ シャ ル え さ を と 
つた だ とき の 判断 

600 て 620 成長 防 害 剤 を と つ だ 
と き の 判 断 

700-720 毒 え さこ を と つ だ と き 
の 判断 

600-600 ボー ナス 

900ー980 ゲー ム オ ー バ ー 

990ー998 デモ (終了 画面 ) 

1000ー 説明 文 表 示 

田 チ ェ ッ フク ボ イン ト 

ご く 普 通 の スク ロー ル ゲ ー ム 

CO ジイ デル が し し で きれ ね 。 

へ び の 数 を 増やし だ い 人 は 120 行 

の HO= テ 3 の 数 を 適当 に 増やし 

て みて ぐだ さい 。 (エイ キチ ) 


(スタ ッ フ 紹介 ププ だけ ちゃ ん ・ そ の 3) その 正体 は 、 征 電機 大 の 2 年 生 。「 明 日 まで レポ ー ト 書か な くち ゃ いけ な いん で す よ ー.。 ング 


昌 個 と が [バス が な こなつ ちゃ う ,( 本 当 は お と うさ ん に 車 で 迎え くに き て も ら つ て る ) と か いつ て 、 締 切り ま ぎ わ こい な ご な る の が 得意 。 


ボ ポケット に 入る よう な ロケ ッ ト 旅 行 


FOR PC- で 660】 恋 閲 計 


一変 数 リス ト 
A…… ロ ケッ ト の 初期 X 座 標 
KCREBN3。22:COLOR2、21 B…… ロ ケッ ト の 初期 Y 座 標 
9:CLS:A=128:B=95:X= 3 人 CO…… ロ ケッ ト の X 護 標 
=RND(1)x236+19:1=3 。  _。 _。 1 D… ロ ケッ ト の Y 卒 本 
71+19:LINE(6.6)-(249 | E.W… 乱 数 
OUND6 ,W: SOUND8 9 _ の AP 
(W+5,E+5),4,.BF 。 還 MMM に 
+RXX:C=X+A : D=Y+B: 90 、 | 99 
NT(C, D) く >3THEN6 | 2 
=STICK(9 ) : A=A- 6099 AS 
(S= 1)-(S=5):GOTO 4 。 | 4 ap あたっ た か 
、B: SOUND1 。 RND( 1 ) x9: IFPOI 18 0 
C。D)= 4THENH= 日 - 18 : UaUTTIGUTUI |。』 計っ 
XEC&H1958: PLAY"b":PRINTSPC(99 。 フー8 ゲー ム オ ー バ パー 
+1" MEN"TAB(33) "PUSH [s] KEY 。 | 画 チ ェ ッ フ ポ イン ト 
FINKEY$="S "THENEXEC7991 : RUN _  』 1 画面 プロ プラム の 場合 6001 
SOUND8、 FRND(H)x15: 'GOTO 8 ーー は 、32x16 字 し か 納 ま ら な いと 
。 | いう ハン テア ガ あ り 、 だ い へ ん だ 
と 思う 。 この ゲー ム は 、 そ の 32 
X16 字 全部 を 使用 し て 作 つ た 力 
作 だ と 思い ます 。 


CKXTEoXCXCXKX XX Tu く uu ut tt 、。 叶 二名 
8 の SS 正 い 人 は 、0 行 に COLOR2、 
さ の ドッ ト ・ ゲ ー ム の な か で は これ が 最 
の > 放 び 万 人 人 4 還 半 MM の 、1 が その 命令 で す の で 、 か 
9 oe SLD  。 ドッ ト は 基本 的 に えて で みて で ぐだ ざし い 。 (エイ キチ ) 
ネー ミン グ び ひっ た だ た り の 小宇宙 旅行 ゲ は 円 を 描く よう に 動い て いて 、 カ ー ソ 


ー ム 。 キ ミ の 乗っ て いる 宇宙 船 は 、 お ル ・ キ ー は た だ を の 円 を 歪め る 力 し か 
員 8 ャ な ば こん な トロ ー い こと や つて る か 


祭 し の と お り 、 写 真 で は 円 を 描い て い な い の だ 。…… 放 : 本 間 : 、 上 / 

0 日 Ri AA つて や や つて みり ゃ わか る よん 。 
あ ド ツ ド 。 この トッ ト を 、 ーー" ツー ツア ーー ァァァ 
カー ソル ・ キ ー で 操作 し て We 9 入 KT 分 リ ? ぼ 
四角 の 基地 へ 到着 する と い と ンプ 5 は 1 
に 、 5 = ミラ や 」 こ も | NE け C ヾ 
ラグ デム 。 天 疹 ずる た だ びに 6 シィ る ン 邊 
和 5 ら 5 学 
半 グ リア て 。、 グー スム オ 1 9 で ラク 091 
ーー 1 ン し 

に な る と 人 合 画 クリ アル し た ん ョ ロー E 1 
2 0 た それ C ェ 6 

壁 や 自分 の 飛ん で きた 跡 き : 硬 て ト 1 1! 
に ぶつ か っ た とき が ゲー ム _ 2 人 て 1 
SN まん 分 に し 1 を 1 

、 私 灯 出 _ た の 

や っ て みれ ば わか る けど し で と た の ー SiSI 

SN まで て 4 * つ * あっ た 同 種 ' ここ ここ ニニ 7 


東 82 (スタ ッ フ 紹介 ノン フー・ そ の 1 ) ポシェ エッ ツ ト で は 2 番目 に 古い 。VOl 1 が 発売 され だ 直後 に 、 突然 編集 部 に 現れ て 「 ぼ こく を 飼 
つて こく だ さい 」 と いう の で 、 ジ ャ マ 森 が 思わ ざ ず 採 用 し て し まつ だ 。 い つも 眠 そ うに 笑っ つて いる よう な 顔 を し て いる 。 


危険 も 金塊 も いっ ぱい の 洞窟 へ / 


グ 遊び 方 Ir 
さ 1 499 


「 HI-SCORE 


キミ は カッ コ い い 探 険 家 。 人 日 も 油 lllilill ll の 
宙 に 入っ て 行く の だ 。 こ うい う の パケ 上 lllll pouw 
ー ビ ン グ ” っ て いう ん だ ぜ 。 | 人 

を し て 当然 の ご と く 《、 そ を そこ に は 金塊 
と 、 ユ コウ モ リ と サソリ が いた 。 [21416| 
加計 で 、 ヨウ モヤ サソリ に つか きま 
ら な い ょ うに し な が ら 、 人 金塊 を 取っ て だ いけ ど 、 コ ウ モ リ が こわ い / コウ モリ は ピクピク フッ と な っ つて 、 し ば 
NN 宮 うっ ら ぐ 動け な くべ く なつ ちゃ う の だ 。 


サソリ は わり と アッ ポー で 、 あ まり 真剣 に 追っ か け て こない けど 、 コ ユウ モ 
り が し つこ い 。 Pe こい つ は 懐中 電灯 9 面目 の シン プル ・ パ ター ン 。 で も 、 


\/ ル ゴ @ クシ ルル 


『 見 ! leo 還 の > だ だ \ 宅 6 し ー] 非 
(82 た 山 ぱ 臣 理 』 の フラ ッシュ で 慎 ) に し びれ させ る の 
、 Sa 9 2 e 
1 レン の 「 - こと が で きる の だ 。 時 々 、 現 「 vm Me 
mW 告 あ る 委 。 れる 壊 中 電灯 を 取っ て 、 コ ユウ ScoRE 
と けり な 邊 ま 6 、 19399 
ミル を ンー 」 モリ 向け て スペ ー ス ・ キ ー て | 
まこ SCORE 
HO 感 9)K。 だ だ 。 こ の 区 は 入 塊 | 
邊 け ア か 激 邊 46299 
1 が 昌 5 も と か し ちゃ う の で 注意 。 居 
と 暗 匠 と | 5 、 ROUND 
W う 黒 - mW 中 電灯 は ボー ナス に も な っ て 
W ご 城 豆 ろ 邊 
1 SG 催 い . な で 。 
1  。 人 2500 点 取る か 金塊 を 15 個 取 
1 "た る | シン っ て し ま ぇ ば 1 面 ク リア 。 面 1 し ここ LCL し LR 
この ` 和 ら りら な ン 上 還 較 着 細 交 XR59565050{†{† つ つつ つつ 
エー ss7。。 は 8 パタ ー ン まで ある を ぞ 。 


19 COLOR 7.9:CLS:WIDTH 49.25:CONSOLE 9.25.9,.9:RANDOMIZE TIME 

29 FOR I=9 TO 7:COLOR=(T, TE ):NEXT:DEFINT A-Z:HI=19999:SCREEN7 , 7 

39 DIM A(29)、B(9).C(9).D(9) ,E(29) 、BB%( 29 ) , CB%( 29 ) ,EB%( 63 ) 

49 RESTORE 1949:FOR I=9 TO 29:READ A(I):NEXT:FOR 1=9 TO 9:READ B(』 ) :NEXT 
S59 FOR I=9 TO 9:READ C(I):NEXT:FOR Ii=9 TO 9:READ D(I) :NEXT 

69 FOR I=9 TO 29:READ E(1I):NEXT:R=1:MAN=3:G=15:SC=9 

79 " 

89 REM エレ エーーー TITLE ーー バー 

99 " 

199 FOR I=9 TO 4 STEP 2:SYMDBOL( 59+ 1 ,39+1 ) 。"GOLD RUSH" 。7 。4 。I+1:NEXT 

119 PUTQA(1.199)-(16.199),AJPSET:PUT@(1.115)-(16,124) ,B,PSET , 2 

129 PUTQ(1.139)-(16.139) ,.C,PSET ,7:PUT@(1,145)-(16,.154) ,D,PSET , 6 

139 PUTQA(1.169)-(16.169) ,E,PSET 

149 P$="t299o3V19e2o4c4o5c218defabp5cdefab":P1$="o6clo5a2":PLAY P$+"o5a8r8o6"+P$ 
・P1$+P1$+ "oO7c16r4o5a4" 

159 FOR I=9 TO 2 STEP 2 

169 SYMBOL(59+I.185),、"Ver、1.59",2.1.2:SYMBOL( 25+1、199)」"・・・Y 0 U".2.1.6 


や ッ ト 用 ゲー ム を や っ つて いる と 、 突然 *TllegalFunction CalI?。 ま あ 、 よ こく ある エラ ー だ けど 、 作 者 に さこ つ そく TE し し た ら 、 
ドー ン ツ 
東信 バグ を 直し た バー ジョ ン ア ッ プ 版 を 送っ て これ だ 。 で 、 ま ざ は 一 安心 (つづ く )。 


前 う ツ せ 


へ vervry は テー 泡 党 と JMIN ロ NN 


【4 
し 
移 


へ に 牛 mom い 移 SHN 半 と NIN ロ NdD 浴 3 の J 仙 


GOLD RUSH の 続き 


179 SYMBOL(25+T。115) 。"・・・UROURO" 2。1.6:SYMBOL(25+I1。139)。"・・・O0IKAKE" 2,1.6 

189 SYMBOL(25+1,145),。"・・・GOLD 199 PTS" 2。1.6:SYMBOL( 25+1.169)。"・・・LIGHT 科 . 記 

ジン の 9 時 」 

199 SYMBOL(359+T,.129)," / へ "4 2 1。7:SYMBOL(359+ 1 128),“ 181" 2。1 7 

209 SYMBOL(359+1.136) う リー ニー ーー デリ 42.1.7:SYMBOL(359+41.144) う へ | / ホ ーー の ドリ 2.1.7 
1 1 


219 SYMBOL(359+1.152)。" 141 ニー16 SPACEI 2 1 /0SMMBOUL(359TI 100) "テテ プ 1 ニー ニー 


ceo 人 0 2 


229 SYMBOL(359+1、168),“ / ハ "2 17:SYMBOL(359+T,176),“ 121 FLASH" ,2.1,7 
239 SYMBOL(359+1.184),“ ーー マ プリ 21.7:SYMBOL(389+1.199)。 "KEY FUNCTION",2。1,7 
249 SYMBOL(289+1.85)。 "HIT SPACE KEY 117.2。.1.5:NEXT 


259 A$=INKEY$ も IF A$ く >" THEN 256 

269 GOSUB 1929:CLS 

27 り 

28 は REM (だ ニーーー の 作 .、、 ーーー 

299 

399 LINE(9.9)-(463,.189) ,PSET,3.BF:LINE(16.19)-(447.179),PSET,9.BF:LINE(432.9)-(4 
47.9) 、PSET ,9,BF 

319 GETQA(619,189)-(625,.189),BB%,G:GETQA(619、189)-(625,189),CB%,G 

329 IF R>9 THEN 4109 

339 IF R>7 THEN LINE(32.29)-(431.169).PSET,3,BF:LINE(48.39)-(415,159),PSET,9,BP: 
LINE(32.99)-(431.99).PSET,9,BF:GOTO 410 

349 IF R=6 THEN LINE(34.99)-(431.99),PSET。3.BF:LINE(224.29)-(239,169) ,PSET.3、BE: 
LINE(224.89)-(239.199) ,、PSET,9,BF:GOTO 419 

359 FOR !=32 TO 416 STEP 32:LINE(E,29)-(I+15、169),PSET ,3,BF:NEXT 

369 IF R=7 THEN LINE(32.99)-(431.99) ,PSET ,3,BF:LINE(298.99)-(223.99) ,PSET 、9,BF:G 
OTO 419 

379 IF R>1 THEN LINE(32.99)-(431.99) ,.PSET 、9,BF 

369 1]F R22 THEN LINE(176.60)-(287.129) PSBT 6,BE 

399 IF R>3 THEN LINE(224.29)-(239,169),PSET,9,BF 

499 IF R>4 THEN LINE(32.79)-(431.199) ,PSET ,9,BF 

419 LINE(488,9)-(632.189),.PSET,4.B:COLOR 5 

429 LOCATE 32.1:PRINT "SCORE" ELOCATE32.3:PRINTUSING" 柱 揚 提 状 半 "SC 

439 LOCATE 31.6:PRINT"HI-SCORE":LOCATE 32.8:PRINTUSING" 柱 本間 杜 " 5 日 

449 LOCATE 32,11:PRINT "ROUND":LOCATE 35.13:PRINTUSING" 拉 提 拓 " ER 

459 LOCATE 32,16:PRINT"M A N":IF MAN>1 THEN PUT@QA(528.146)-(543.155).AJPSETEIF M 
AN>2 THEN PUT@QA(553.146)-(568.155) ,A,PSET 

469 RESTORE 1999:FOR I=9 TO 14:READ AX.AY:PUTQ(AXJAY)-(AX+15,AY+9).D,PSET 6:NEXT 
479 

289 REM ーー 一 WAIT NRN ニニ ーーー 

499 

599 LINE(X,Y)-(X+15、Y+9) ,PSET 、9 ,BF 

519 GETQA(2009,90)-(231 .99) ,EB%。G 

529 GETQA(XX1 YY1)-(XX1+15.YY1+9) 、BB%,G 

539 GETQA(XX2 。YY2)-(XX2+15.YY249) ,CB% ,G 

549 PUT@(XX1 YY1)-(XX1+15,YY1+9).B,OR,2 

559 PUT@(XX2.YY2)-(XX2+15,YY2+9) 。C,OR,7 

S69 A$=INKEY$ 

579 IF A$=" " AND PF=1 THEN ON FF GOSUB 959,.969.979,989:LINE(559.179)-(565.179),P 
SET .9.BF 

589 IF A$="8" AND Y>9 THEN Y=Y-19:FF=1:IF POINT(X.Y)=-1 THEN Y=Y+19 ELSE BEEP1 
599 IF A$="2" THEN Y=Y+19:FF=2:IF POINT(X,Y)=-1 THEN Y=Y-19 ELSE BEEP 1 

699 IF A$="4" THEN X=X-16:FF=3:IF POINT(X.Y)=-1 THEN X=X+16 ELSE BEEP 1 

619 IF A$="6" THEN X=X+16:FF=4:IF POINT(X,Y)=-1 THEN X=X-16 ELSE BEEP 1 

629 IF POINT(X,Y)=9 AND POINT(X+15,Y+9)=-1 THEN GOTO 889 

639 IF POINT(X,Y)=9 AND POINT(X,Y+3)=-1 THEN GOTO 889 

649 IF POINT(X,Y)=9 AND POINT(X+1 ,Y+9)=-1 THEN SC=SC+199:G=G-1:PLAY"o6L32CDEL8CD 
16A":LOCATE32 .3:PRINTUSING" 拓 拉 韻 半 盾 寺 " 15C 
659 IF POINT(X,Y)=9 AND POINT(X+3,Y)=-1 THEN SCR=INT(RND( 1 )x19)x199:SC=SC+SCR: SY 
MBOL(299,99) , STR$(SCR) 、1.1.7:FOR I=9 TO 599:NEXT:PUTQA(209 ,99 )-(231 ,99) ,.EB%,PSET 
:F=1:LOCATE 32.3:PRINTUSING" 提 提 提 韻 寺 拓 "*SC:PUTQA(559.179)-(565,179),E,PSET :FZ=9 

669 PUT@A(X、Y)-(X+15.Y+9).A,PSET:BEEP 9 

679 P=INT(RND(1)x19) 

689 IF P=1 THEN VX1l=16:VY1=9ELSE IF P=2 THEN VX1=-16:VY1=9 

699 IF P=3 THEN VY1=19:VX1=gELSE IF P=4 THEN VY1=-19:VX1=9 

799 IF PCINT(XX1+VX1 、YY1+VY1)=-1 OR YY1+VY1=9 THEN VX1=9:VY1=0 

719 P=INT(RND(1)x19):IF FL>9 THEN VX2=9:VY2=9:GOTO 760 

729 IF P<R+2 THEN IF P<(R+2)/2 THEN IF X>XX2 THEN VX2=16 ELSE IF X く <XX2 THEN VX2= 
まる 

739 IF P<R+2 THEN IF P>(R+2)/2 THEN IF Y>YY2 THEN VY2=19 ELSE IF Y く YY2 THEN VY2= 
-19 

749 IF YY2=9 AND VY2=-19 THEN VY2=0 

759 IF POINT(XX2+VX2、YY2+VY2)=- 1 THEN VX2=9:VY2=g 

769 PUTQA(XX1 YY1)-(XX1+15,YY1+9) , BB%, PSET 

779 PUT@QA(XX2.YY2)-(XX2+15.YY2+9) ,CB% PSET 

789 XX1=XX1+VX1:YY1=YY1+VY1:XX2=XX2+TVX2:YY2=YY2+VY2 

799 IF XX1=XX2 AND YY1l=YY2 THEN FL=9:COLOR=(7。7 ) 

899 IF FZ>9 THEN FZ=FZ+1:IF FZ=39 THEN FZ=9:LINE(208。99 )-(223。99) 。PSET。9。 BF 


う 2 の や お っ うに さっ そこ く 遊 んで みだら 、 確 か に その バグ は 直っ て い だ 。 し 、 し か し 、 レ イア ウト が 済ん で ひら 、 ま だ まだ バグ 発見 / 
陸 + が な いか ガ ら 、 編 集 部 一 の 優し い ゃ だ けち ゃ ん が 直し て あげ だ よ 。 バー ジョ ン ア ッ プ で バグ を お まけ に せん で くれ …。 


し よう 


819 IF INT(RND(1)x199)<3 AND FZ=9 THEN PUT@A(298, 99 ) -(223,99) ,E,PSET : FZ= 1 

829 IF FL>9 THEN FL=FL+1:IF FL=29 THEN FL=9:F=9:COLOR= (7,7) 

839 IF G=9 OR SC=>Rx2599 THEN SC=SC+Rx109:R=R+ 1 :F=9:FL=9:G=15:GOTO 269 

849 GOTO 489 

859 … 

869 REM ピエ ーーー GAMEOVER 一 一 - 

879 『 

889 PLAY"o3a8o7c32d8b32o5d32c16a16" :MAN=MAN- 1 :LINE(528+25x(MAN-1 ) ,146)-(528+25x( 

MAN-1)+15,155) ,PSET ,9,BF:FOR 1I=9 TO 1999:NEXT:F=9:FL=9:LINE(559,179)-(565,179) 。P 

SET ,9。BF 

899 IF MAN く > THEN LINE(X,Y)-(X+15,Y+9) ,、PSET,9,BF:LINE(XX1 , YY1)-(XX1+15,YY1+9),P 

SET,9,BF:LINE(XX2,YY2)-(XX2+15.YY2+9) ,PSET ,9,BF:GOSUB 1929:GOTO 489 

999 SYMBOL(59,89) , "GAME OVER",7,4.1:LOCATE 15,18:PRINT"PLAY AGAIN? (Y/N)":IF SC> 

HI_ THEN HI=SC:LOCATE 15,21:PRINT"YOU ARE HI-SCORE" 

919 A$=INKEY$:IF A$="Y" OR A$="y" THEN CLS:SC=9:R=1:MAN=3:G=15:GOTO 269 ELSE IF 

A$="N" OR A$="n" THEN END ELSE 916 

929 … 

339 REM レーーー FLASH 一 一 一 - 

949 … 

959 LINE(X,Y)-(X+15.Y+TY) ,XOR,6,BF:IF Y+TY=19 THEN 999 ELSE TY=TY-19:IF POINT(X, 

Y+TY)=-1 THEN 999 ELSE IF POINT(X+2,Y+TY)=-1 THEN FL=1:COLOR=(7,1) :GOTO 959 ELSE 
959 

969 LINE(X,Y)-(X+15,Y+TY+9) ,XOR,6.BF:SS=9:IF Y+TY=179 THEN 999ELSE TY=TY+19:IF P 


O0INT(X。Y+TY)=-1 THEN 999 ELSE IF POINT(X+2,Y+TY)=-1 THEN FL=1:COLOR=(7,1):GOTO 9 
69 ELSE 966 
979 LINE(X,Y)-(X+TX、Y+9) ,XOR,6.BF:IF X+TX=16 THEN 1999 ELSE TX=TX-16:IF POINT(X+ 


TX,Y)=-1 THEN 1999 ELSE 
SE 979 

989 LINE(X,Y)-(X+15+TX,Y+9) ,XOR,6,BF:SS=15: IF X+TX=432 THEN 1999ELSE TX=TX+16:IF 
POINT(X+TX,Y)=-1 THEN 1999 ELSE IF POINT(X+TX+2.Y)=-1 THEN FL=1:COLOR=(7,1 ) :GOT 
0 989 ELSE 989 

399 LINE(X,Y)-(X+15,Y+TY+SS ) 、PSET , 9 , BF:TY=9:F=9:SS=9 : RETURN 

1999 LINE(X.Y)-(X+TX+SS,Y+9) , PSET , 9 ,BF :TX=9:F=9:SS=9 : RETURN 

1919 … 

1029 X=432:Y=9:XX1=298:YY1=89:XX2=298:YY2=99:FZ=9:COLOR=( 7 。7 ) : RETURN 

1939 

1949 DATA 9,9,9,9,9,8184,32766,2916,2916,9,9,9,9,9,384,1792,448,39846.9,32766,29 
16,4989,4989,-1,384.6392,32318,32679,2916,9 

1959 DATA 29498,21454,8184,.2916,16389,18492,16389,17346,489,255 

1969 DATA 8196,24582,29262,-1633、,-1 ,-1,.32766,28686,12399,8196 

1979 DATA 969,969,2916.2916,4989,15429,15429,32382,32382,32766 

1989 DATA 9.9.9,2916.1824,1824,1824,2916,2916,2916,16389,8184,4989,.9,9.9,9,9,9,9 
9,.9.9.2916.1824.1824,1824.2016,2916.2016 

1999 DATA 16,19,16,179,48.59,89,139,112.59,144.139,176,59.298,139,249,59,272,139 
394.59,336 , 139 ,368, 59 ,499,139,432,179 


IF POINT(X+TX+2,Y)=- 1 THEN FL=1:COLOR=(7,1):GOTO 979 EL 


変 数 リス ト ・ 上 Z…… 棲 中 電灯 の カウ ント  ・ 560-610 キー 入力 判断 ・ タ 
H 1 …… ハ イス コア ・ AX, AY……… 金 の 座標 ・ 620630 敵 に 捕まる 判定 : 田 チ ェ エッ フ ボ ポイ ント 
A( )…… プ レイ ヤー の キャ ラフ ・ F…… 棲 中 電灯 を 持つ て いる ガ : 640 金 を 取る 判定 と 得 ・ ラウ ンド の ら 面 と O 面 が 同じ 
9 ・ FF…… 向 いて いる 方 向 8 点 表示 ・ な の で 、 ら 8@ 面 を 新しく 作ろ う 。 
B( )…… サ ソリ の キャ ラク タ  ・ TX, YY…… 光 の 移動 量 ・ 650 棲 中 電灯 を 取る ・ 315 IF R=9 THE 
C( )…… コ ウ モ リ の キャ ヤラ クタ : FL し …… コ ウ モ リ 気 絶 カウ ント : 660 自分 の 表示 ・N LINE (32, 4 の ) 一 
D( )…… 金 の キヤ ラフ クマ ・ SS…… 光 線 の 調節 用 ・ 670-700 サソリ 移 動 量 決定 ・ (43 の , 1 48) , PSET 
E( )… 林 中 電灯 の キャ ラフ クタ : SCR…… 棲 中 電灯 の ボー ナス : 710-750 コウ モリ 物 動 量 決 : , 3, BF : L INE (4 フ , 
BB%( )…… サ ソリ の バッ フク  : 点 ・ 定 ・ 49) 一 (415, 139) , 
CB 穴 ( )…… コ ウ モ リ の バッ フ : VX1.VY1 …… サ ソリ の 移動 : 760-780 敵 バ ッ フ の 表示 : PSET, の , BF:LINE 
EB%( )…… 懐 中 電灯 の バッ ク ・ 量 ・ 790 青 コ ウ モ リ と サ ソ ・ (4 フ , 6 の ) 一 (415, 1 
R…… 画 数 ・ VX2VY2…… コ ウ モ リ の 物 ・ リ の 重なり 判定 : 29) , PSET, 3, BF : 
MAN…… プ レイ ヤー の 数 。 ・ 動 量 ・ 800 ライ トカ ウン ト  ・ L INE (298, 32) 一 ( 
G…… 金 の 数 ・ 較 プ ログ ラム の 説明 ・ 810-820 懐中 電灯 処理 " : 223, 139) , PSET, 
SC…… 得 点 ・ 10 一 60 初期 設定 1 ・ 830-840 面 フ リア 判定 と ル ・ の , BF:GOTO 419 
P$,P 1 $……PLAY 文 デー : 70-260 マイ トル 表示 6 ー プ ・ 以上 を 打ち こん で みて ね 。 自 
タ ・ 270 一 460 画面 設定 ・ 850-910 死ん だ と き の 処 理 、 ・ 分 の オリ ジ ナ ル 面 を 作 つ て みる 
A$…… キ ー 人 入力 用 ・ 470-840 メイ ン ル ー チ ン ゲー ム オ ー バ パー : の も いい と 思う 。 (だ けち ゃ ん か ) 
X, Y…… プ レイ ヤー 座標 "・ 500-550 自分 の 消去 、 敵 の ・ 920-1010 光線 の 処理 ・ 
XX1.YY1 …… サ ソリ の 座標 PUTS キャ ラク “090 初期 設定 の -  : 
XX2.YY2…… コ ウ モ リ の 座標 ・ タバ ッ ク GET  ・ 1030~-1090 キヤ ラフ タ ・ デ テー <: 


民 テッ 
表面 9 


(スタッフ 紹介 プク フー・ そ の 2〕 フー は 、 ら S 修 大 の 4 年 生 。 最 近 、 某 大 手 コ ン ビュ ユー ツタ ・ メ ー カ ー、 の すず 会 社 に 就職 が 決ま つ う ア 7 
て 、 日 本 の 将来 を 育 負 つ て 立つ SE (シス テム ・ エ ンジ ニア ) の 夢 に 問 えて 、 な ぜ ば か アッ ブル こと X 1 を 買 つ だ 。 


\ ン ルコ e ククル クル ク ク 


立体 風 画面 で 戦う 


UF O 戦 争 


【 
上 


前 


中 


な 


[< 遊び 万 


RUN さ せる と 、 ジ ャ ー ン っ て 感じ で 
育 京 を 描き は じ め る 。 こ れ が 、 な か な 


か いい ん だ よね 。 

で 、 こ ちら に お し り を 向け て 現れ る 
の が 、 キ ミ の JS-70。 こ ちら 側 を 向い 
て いる の か 滴 機 。 JS-70 を テン キー で 


な か か が か カ 還 し いん だ けど 、 こ の 5S-70 
に は 重大 な 欠陥 が ある 。 な ん と 、 ビ ー 
ム を 右 方 向 に し か 撃 て な い の だ 。 チ ェ 
ッ ク ボ イン ト 見 て 改良 し て ね 。 


操作 し て 、 ス ペー ス ・ キ ー で ビー ム 発 
射 。 1 面 に つき 、5 機 の 敵 機 や や っ つ 
け よ う 。 5 機 や っ つけ た ら 、 1 面 ク リ 
ア 。 1 面 を クリ ア す る の に 妥 し た 時 間 
が 短けれ ば 短い ほど 、 ボ ー ナ ス 得 点 が 
内 き y ぞ 。 

だ だ し 、 ビ ー ム を 一 発 撃つ ご と に ス え 
コア が 10 点 減る を の で 、 ム ダ 撃 ち は な る 
べく し な いよ うに 。 ビ ー ム は 、 敵 機 を 
ギリ ギリ まで 引き つけ て 、 ち ょ うど い 
い 位置 に こない と 
20 示 の ない 。 な か 


ム え えい 、 反 撃 / フ ソ ッ 、 で も な か 
な か あ だ ら な いん だ よー / 


ム ブ ァ ッ シャ ー ン 。 敵 に 体 当 だ りさ れ 
て 、 コ ナ ゴ ナ に け 砕 け 散 る JS-70。 ほ 
と ん ご 追い つめ られ だ つて 感じ 。 


ITTT エド の ) 2 の 茸 い を 。 あ 、 
AU も ま 3 で て でも た 、 敵 と ぶつ か っ 
WW て 十 す ム す っ - 本 
Im の を  /W て し まう と 、 自 機 
lm も 選 今 創 パ ・ ーー 還 失 失 失 迷 に 
mW う 点 回 る ン ソン ・  。 が 1 機 成 っ て し ま 
ms と を の ー ゴ 6 の 邊 8 
sm 2 つ 任 て うう の だ 。 
ms くい 品 下 ] に 歴 す ョ RE 
は まま を 間 
= 2 の | | の 生ま 機 だ けど 、 面 クリ 
m い ジー | が か じ 胃 。 える と 1 機 追 加 さ ーー- 
sm た ナ G ロ まぁ 人 の ら 』 
た た も ャ ッ ン の! れる 。 
1 「 す 、 還 還 還 旨 還 還 感 ロ 投 』 。 画面 も きれ いて 、 ここ 
Ci Li il 1 LILLL LIL L LlL iL LO っ ム や つと あ た だ た つ だ 。 今度 は 敵 が 砕け 散る 番 だ / 
画 変 数 リス ト ・ DX.EX……ENEMY 物 動 量 用 ・ HISC…… ハ イス コア ・ 250260 初期 設定 
JSN…… り S-70 の 残り 数 。 : C…… パ ッ ク の 山 の 半 径 ・ 一 ブロ ブラ ム の 説明 ・ 270-360 背景 作成 
JSR( )JSL( )…JS-70 の ・ X, Y……:JS-70 の 座標 ・ 10 一 60 初期 設定 と タイ トル ・ 370-430 ビー ム 発 射 ル ー チ ン 
キャ ラク フタ ・ TX.TY……ENEMY の 卒 標 ・ 70-120 ENEMY の キャ ラフ: 440-500 ENEMY 爆 発 ルー 
TSA……ENEMY の キャ ヤラ : HA…… ヒ ッ ト ナ ン バ ー - 設定 ・ まみ 
ウン ・ AS,」SP…… キ ー 入 力 用 ・ 130-220 JS-70 の キャ ランタ : 510-560 自 機 加 発 ルー チン 
Y.T……JS-70 キ ャ ヤラ フタ ・ ・ ABX.ABY…… 敵 命中 判定 用 ・ 設定 ・ 570~820 メイ ン ル ー チ ン 
デー タ 5 Bi ナス ・ 230-240 オー プ ニ ン グミ コー : 580-600 メッ セー ジ 表 示 
CLE…… ラ ウン ド 数 ・ AA… 自 機 増 胃 用 フラ  ・ ジッ フク ・ 60 キー 入力 設定 
う .2 本 エット / 盆 スラ ッ フ カノ クー . その 3) フー の 1 日 。 目 を さま す の は 午後 4 時 ご ろ 。 ら 時 すぎ に 編集 施 に き て 、 ス タン ダー ド ・ ジ ャ 


ズ を 口ずさみ な が ら 仕 事 。 帰 る の は 11 時 ころ 。 家 に 帰 つ て アッ プル の ゲー ム で 朝 4 時 まで 熱中 。 朝 5 時 ご ろ 就 寝 。 5 


素人 9 


19 COLOR7 、9:WIDTH8 ,25:SCREEN7 ,7 : JSN= 5 : CONSOLE9 、25 ,9 , 1 :RANDOMIZE TIME:CLS 

29 DIM JSR(189) ,JSL( 189) .TSA(97) 

39 FORW=192 TO198 STEP2:A=A+1:SYMBOL(W。A) 。"JS 79". 19.5。2:NEXT 

49 SYMBOL(119.5)。"JS 79".19.5,.5 

59 B=199:FORA=59TO159 STEP5:CIRCLE(329.B) ,A.3,.1:B=B+2:NEXT 

69 SYMBOL(499.189),。 "by..G",5,1,1 

7 キャ + キ すす T SA トメ メ エ テテ エエ テテ エエ テテ 】 

89 CONNECT(329.59 ) -(349.58)-(329.66)-(399,58)-(329,59 ) ,6,PSET 

9 CONNECT(299.59)-(312.52)-(327.58)-(312.64)-(299.66) ,6.PSET 

199 CONNECT(359.59)-(328.52)-(313.58)-(328.64)-(359,66) , 6,PSET 

119 PAINT(329.52) ,2.6:PAINT(329.64) ,。2.6:PAINT(329,58),.6、.6 

129 GET@A(299,.59)-(359.,66 ) ,、TSA,G 

139 '+++ ャ キャ + ャ ++ JJG ミキ ~  。 ++ キ キキ キオ キキ 

149 FORC=1TO3:READ Y,T:CIRCLE(Y.T) 7。4,.4:PAINT(Y。T) ,2,.4:NEXT 

159 DATA 599,.191.515,193.539,195 

169 CONNECT(495.191)-(489.191)-(465,.97) ,4:CONNECT(535 ,197)-(559,112)-(563,.112).,4 
:CONNECT(599,98)-(539.95)-(539,194)-(537,198),4 

179 LINE(528.95)-(539、194) ,PSET , 4 :CONNECT(519,99)-(527.97)-(532.191)-(519.99).,4: 
PAINT(527.98),2.4:GET@A(465,95)-(565,112) ,JSR,G 

189 "++++ キ + キ ++ オ + 。 JS ヒ タ ~ リ ++ す すす キキ す すす すす 

199 FORC=1TO3:READ Y,T:CIRCLE(Y,T),7.4。.4:PAINT(Y,T),2。4:NEXT 

299 DATA 199.195.115.193.139.191 

219 CONNECT(95.197)-(89、112)-(65,112),4:CONNECT(135。191)-(159,191)-(165.97) ,4:CO 
NNECT(139,98)-(199.95)-(94、194)-(96,.198).,4 

229 LINE(191.95)-(94、194) ,PSET , 4 :CONNECT (12 .99)-(193.97)-(199,191)-(129.99) ,4:P 
AINT(197.98).2.4:GET@A(65.95)-(165,112) ,JSL,G 

239 PLAY"V5T299L303 GFL14GR8GFGAB 04C":PLAY"L303 GFL14GR8GFGAB 04C" 

249 PLAY"O5T189GFGFGFGFEDEDEDEDGFEDGFEDL306C" : FORW= 1TO2999 : NEXT 

1) 還 K メス ベス スズ スム メス メメ ススメ スペ スス ベベ ペペ スズ メス メ メス ズバ 】 

269 CLE=CLE+1:IF CLE=1THENDX=49:EX=29:ELSE IF CLE=2THEN DX=59:EX=26:ELSE IF CLE= 
3THEN DX=79:EX=35:ELSE IF CLE=4 THENDX=79:EX=49:ELSE IF CLE>4THEN DX=89:EX=69 
279 "ーーーーーーーー ニ ーー ヤ マ 

289 SCREEN7 , 7:Y=19:COLOR7 : CLS 

299 C=45:FORA=59 TO88 STEP2:C=C+5:CIRCLE(329,A) ,C,1,.1:NEXT'1 

399 C=25: FORA=19 TO38 STEP2:C=C+5:CIRCLE(599 ,A),C,1。.1:NEXT'2 

319 C=39: FORA=29 TO48 STEP2:C=C+5:CIRCLE(199,A),C,1,.1:NEXT'3 

329 C=55: FORA=99 TO146 STEP2:C=C+5:CIRCLE(159 ,A) ,C,1,.1:NEXT'4 

339 C=95: FORA=159 TO299 STEP2:C=C+5:CIRCLE(649.A) ,C,1,.1:NEXT'5 

349 SCREEN6 , 7 

359 X=399:Y=199:TX=139:TY=89:HA=9:TIME$="99:99:99" 

369 GOTO589 


ーー 0 年 ご sm ど ユー ピーー コ と 
389 LINE(X,Y+2)-(X+89,Y-29 ) ,PSET , 2:LINE(X+199.Y+17)-(X+89,Y-29 ) , PSET , 2:PLAY"T259 
L701S14M1C" 


399 FORW=1TO89:NEXTW:SC=SC- 19:IF SC<9 THEN SC=@ 

499 LINE(X,Y+2)-(X+89.Y-29) ,.PRESET:LINE(X+199。Y+17)-(X+89,Y-29) 。PRESET 

419 ABX=ABS((X+89)-(TX+39 ) ) : ABY=ABS( (Y-29 )-(TY+8) ) 

429 IF ABX<39 AND ABY<8 THEN GOSUB459 

439 RETURN 

449 "ーーーーーーーー ニ ーー テキ ルル ~ ク ハツ ーーーーーーーーーーーーー 

459 PLAY"v5T32 L3 01S9 M15999 C" 

469 FORF=1TO25 

479 PUT@A(TX+2.TY)-(TX+67.,TY+29 ) ,TSA , PSET : PUT@A(TX,TY)-(TX+79,TY+25 ) , TSA, PSET 
489 NEXTF:LINE(TX,TY)-(TX+79 .TY+25 ) , PRESET , , BF 

499 TX=115:TY=89:HA=HA+1:SC=SC+199-(ABX+ABY):IF HA=5 THEN LOCATE43,23:PRINT"5": し 
0CATE66 , 23:PRINTSC: RETURN839 

599 RETURN586 

519 "ーーーーーーーーーー シ ~ フン ハ ~ グ 用 ーーーーーーーーーーー ニ ーー 

529 PLAY"v5T32 L3 01S9 M15999 C" 

539 FORF=1TO29 

549 PUT@A(X、Y)-(X+119、Y+15) 、JSR,XOR:PUT@A(X。Y)-(X+95。Y+16) ,JSR ,PSET : NEXTF 

559 LINE(X,Y)-(X+119.Y+18) ,PRESET , , BF :X=399:Y=199:JSN=JSN- 1 : IF JSN=9 THEN LOCATE 
28.23:PRINT "9":RETURN916 

569 RETURN589 

579 ニーーーーーMAIN テ ーー 一 

589 COLOR19:LOCATE1 .23:PRINT" ROUND "iCLE:LOCATE 12.23:PRINT" COUNT THE SHIP":JS 
N:LOCATE31 .23:PRINT" HIT NUMBER" :HA 

599 SOUND 8,.5:SOUND 6,&HIF:SOUND 7.,&H35:SOUND 13,43:SOUND 11,89 

699 COLOR19:LOCATE46.23:PRINT "TIME ":TIME$:LOCATE69.23:PRINT" SCORE" : SC 

619 P=PEEK( &HFD9 1 ) :A$=INKEY$ 

629 LINE(TX,TY)-(TX+69,TY+16) ,PRESET , , BF 

639 TX=TX+FIX(RND( 1 ) xDX- (DX/2 ) ) :TY=TY+FIX(RND( 2 ) EX- (EX/2 ) ) 

649 IF TX< の THEN TX=9 ELSE IF TX>569THEN TX=569 

659 IF TY<9 THEN TY=9 ELSE IF TY>163 THEN TY=163 

669 PUT@A(TX.TY)-(TX+69.TY+16) .TSA,PSET 

679 LINE(X.,Y)-(X+199、Y+17) ,PRESET , , BF 

689 IF P=&H34 THEN X=X-25:IF X<9 THEN X=9 

699 IF P=&H34 THEN PUT@A(X,Y)-(X+199,Y+17) ,JSL。PSET :GOTO779 

799 IF P=&H36 THEN X=X+25:IF X>529 THEN X=529 < 

719 JF P=&H36 THEN PUT@A(X,Y)-(X+199.Y+17) ,JSR,PSET : GOTO0776 

729 IF P=&H38 THEN Y=Y-15:IF Y<39 THEN Y=39 

739 IF P=&H38 THEN PUT@A(X,Y)-(X+199.Y+17) ,JSL, PSET : GOTO779 

749 IF P=&H32 THEN Y=Y+15:IF Y>169 THEN Y=169 1 

759 IF P=&H32 THEN PUT@A(X,Y)-(X+199.Y+17) ,JSR,PSET : GOT077 ひ の 

769 PUT@A(X,Y)-(X+199,.Y+17) ,JSR 、PSET 

779 IF(TX+69>X AND TX+69 く <X+199) AND (TY>Y AND TY<Y+17) THEN GOSUB 529:GOTO819 
789 IF(TX>X AND TX く <X+199) AND (TY>Y AND TY<Y+17) THEN GOSUB 529:GOTO819 

799 IF(TX>X AND TX<X+199) AND (TY+16>Y AND TY+16<Y+17) THEN GOSUB 529:GOTO819 
899 IF(TX+69>X AND TX+69 く <X+199) AND (TY+16>Y AND TY+16<Y+17) THEN GOSUB 529 
819 IFA$=CHR$(&H29 ) THEN GOSUB 386 

829 GOTO599 

839 "ーーーーーー ニ ーーーー CLEAR A ROUND 

849 FORW=1TO1599 :NEXTW: SCREEN7 , 7 :COLOR7 :CLS : BO0=599-TIME: SC=SC+BO 

859 SYMBOL( 199 , 29 ) , "BONUS +"+STR$(BO) ,3。2.4:SYMBOL( 1 99,59 ) , "COUNT THE SHIP"+STR$ 
( JSN ) , 3,.2。4 

869 SYMBOL( 199 ,89 ) . "SCORE "+STR$(SC) ,3.2.5:SYMBOL( 9 ,119) "ROUND"+STR$(CLE)+" CLE 
AR _ 109.5.5.6 

879 PLAY"v7t25515o6c119cr64cr64cr64cr64cr64cr64cC13d119C","V6t29912o4cdC" 

889 FORW= 1TO3999:NEXTW 

899 IFAA=9 AND SC>2999 THEN JSN=JSN+ 1 :PLAY"V7T299L706CR32L15CDL3E" ,"V505L6CE" : SY 
MBOL(599.59) "41".3.2.7:AA=-9:FORW= 1TO5999 : NEXT 

999 GOTO259 

919 "ーーーー ニ ーー ニーーー GAME OVER 

929 COLOR=( 1 1):COLOR=( 2.2) 

939 FORW=ITO1599:NEXTW:SCREEN7 ,7:LINE(9,9 )-(639,199),PRESET , , BF : COLOR7 : CLS 
949 SYMBOL( 39 .59 ) , "YOUR SCORE"+STR$ も (SC) ,5.5,5 

959 IF SC>HISC THEN SYMBOL(299 ,199) , "You are best !"。3.2。2:HISC=SC 

969 SYMBOL( 59,139 ) , "GAME OVER",8.2.6:SYMBOL(79,.189) ,. "HIT [RET] KEY" 5,1.7 

979 !$ も =INKEY$: IF 1I$=CHR$( 13)THEN 989 ELSE 979@ 

989 LINE(9,9)-(639。199) ,PRESET , , BF : CLS : SYMBOL(289,89) ,"READY",3.3,5 

999 FORW=1TO0299g :NEXTW:CLE=9 : SC=9:JSN=5: AA=9 :GOT0259 


っ 回 


プロ 7 ァ 


ム 


ポシェット 


620-600 ENEMY 秘 動 

670 一 /60 自 機 秘 動 

770 一 600 接触 判断 

610 ピー ム 発 身 
630-900 ラウ ンド クリ ア 
9I0C2000 7ー ム オー パー 
一 チェ エッ フ ボ イン ト 

実際 に 走ら せ て みれ ば わか る 
が ピー ム は 右 訪 向 に し か 打 て な 
い 。 を 記 向 に も 打てる よう に し 
よう 。610 行 カッ コ 内 を &H44 
に し て 、 

ら 815 IF AS=CHR 
ゃ (SH41) THEN GO 
SUB1 の 9 の 

1 の 9 の 9 PUT@A(X, Y 
/ー(X キ 1 の の イキ 1 の 
SF ビ SET 

4 の 1 の り の LINE ば 19 
の 。 イギー (ずら の Y 
9 内 の 民 ま 。 る 2 し 1 
NE KAX。 ボキ リア) つっ 人 べ 宇 
と の ) イー ジ の ) 。 SE 1。 
2:PLAY “125 の L/ZO 
1S14M1C? 

1 の どの FORW=1 TO 
8 の : NEXTW : SC=SC 
デール : FSSC く の RE 
NSC= の 

1 の 3 の LINE (X+1 


の 29 の , ヤオ 2) 一 (X+29 の , ヤ 


の の 選 全 全島 3 1 
NE (XX, Y 土 1 フ ) 一 (XX 二 
どの ドー ジ クジ の ) , RES 到 
ェ 

1 の 4 の ABX= テ ABS ( 
(X 十 の の ) 一 (TX 十 3 の ) ) 
・ABY=ABS ( (Yー2Z0 
こう 

1 の 5 の IFABX く 3 の 
AND ABY< く 8 THEN 
GOSUB459 の 

1 の 6 の 9 RETURN 
攻撃 は 、“A" で 左 ビ ー ム が 、 
^D/ で 右 ビ ピー ム が 打てる 。 これ 
だ け の 改造 を する の に ずい ぶん 
知 労 し た ん だ よ 。 や つば ぱり 、 は 
じ め か ら 左 ビー ム も 撃て る よう 
に し て ほし か が つ だ も の 。 ご こん な 
大 サー ビス は 今回 ひけ ぎり に し ち 
お つか か"……。 だ つて 、 も う 
すぐ 試験 な ん だ も ん 。 

(だ けち や ゃ ん) 


(スタ ッ フ 紹介 ン ノバ ンプ ・ そ の 1 ) さま ざま な 謎 に つつ まれ だ X 1 ユー ザー。 主 に 本 誌 で 活躍 し て いる だ め 、 ポ シェ エッ ト の 編 うう 
あ 古 t 集 か ら は ちよ つと 離れ ちゃ つた だ けど 、 ネ コ を 中 心 と する イラ スト を いつ ば いか いて ぐれ だ 。 


ノ - ル ゴ @⑥ ググ ンク ググ 


、 遊び 廊 


まず 、 絶 対 に オリ ン ピ ッ ク の 種目 に 
は 取り あげ て も ら を な い は ず の タイ マヤ 
引き 競争 。 で も 、 タ イヤ 引き に 燃え る 
キミ は な ん と か この 競争 を 盛り あげ て 
いき だ た い 。 そこ で 、 海 の 近く の 適当 な 
運動 場 を る 僅 りき っ て 、 タ イヤ 引き 競争 
世界 選手 権 を いき な り 開 いて し まっ た 
の だ っ た 。 集 まっ だ の は 、 埼 玉 チ ャ ン 
ンク 、 関東 チャ ング 、 昌 本 チ ャ ン ア 、 東 
伴 チ ャ ヤツ グ 。 愉 外 チ ギ キシ シン (し が (し 、 
夫 当 に いる と お も し みい /) キミ は 人 彼 
ら と 次 々 に 対戦 し て いく の だ が ……… 8 

RUN の あと 、 キ ミ の 名 前 を 入力 し て 


な S8SCe ke 2936) 


ソフ ド ノ 


人 な ヨー マイ 。 に ビン / の 9 チャ ン は サイ 
ダマ チャ ヤン プ に 勝て る で し ょ よー か 


人 見 見 思 


{5 5 の けど な う 『 
| UPF な か っ) し ば ぼ は 
> りく C いい 
。 
けり 行 2 
な き 


で 
ン 
で で トキ 


で: ン す 1 


中 消 対 汗 員 性 詩 均 へ 員 布 ま 


A 9 豆 放 糧 0 
さす 脚 中 


ィ 
ど , 
3 


か NNN DP ilb マ 3 の 2 
。 叶 用 革 D 交 中 朝 ③ 掴 玉 江 只 . 詩 二 均 へ 
II 1 1I 1 I I ! ! I !』 !I I Ii I ja 


し 』 


< と さま rrN ロ 忌 装 十 /A ど よ 。 と て 京 


し ば らく 《 侍 つと 画面 完成 。 ス ペー ス ・ 
キー を 押す と 対戦 者 の 名 前 が 出 て 、 も 
う 一 度 ス ペー ス ・ キ ー を 押す と ゲー ム 
パード トド 。。 コール 」 と 表示 され て 、 
1.5 秒 後に スタ ー ト 合 層 の ピス トル が 鳴 
る 。 「 

キミ は 、 画 面 の 上 に いる 青い 頭 の ラ 
ン ナ ー。 下 に いる の が も ちろ ん 対戦 相 


手 。 最初 は ちょ ろ い 、 埼玉 チャ ン フ だ 


か ら 、 負 け だ ら ハ ジ で っ つっ せ 。 
IN、 IM 一 を 交互 に す ば 
0 記 だ は だ たく は /、 

SO ラシー は まく (か る 。 


1 3 お お つ 、 いい 勝負 。 で 
ル 目 前 、 ラ スト スパ ー ト で 
勝負 が 決ま り そ う 。 


努力 と 根性 の 人 、 ダ ケチ 


ヤン の 勝ち / 炊 は 、 東洋 
チャ ンプ と の 戦い だ 。 


人 に 1! 
ます プチ ゃ 71 


いかが に ダグ ダイス ツク よく キー を だ だ きつ 
づけ る か が 、 勝 負 の 分 か れ 目 だ 。 
走り つづ け て いる あい だ も 、 波 の 音 
かー ウタ しき さん で て でき て 、 い 
っ だ UM まく は 師 を し て る ん だ ろう と 、 
か ぶ と われ に か える こと も ある けれ と 、 
ま の いい や や な い 。 楽し く や の ろう せ 。 

ちち 26 の に 、 信 の と こる 、 介 界 チ ャ ン 
に 勝っ た 人 は いま せん 。 


272 327 5 2 の 人 62 


(スタ ッ フ 紹介 プ パ ンプ ・ そ の 2) バン プ は 毎夜 10 時 半 に 都内 の 謎 の 女性 に 謎 の 電話 を ひけ 、 謎 の 長 話 を する 。 ジ ヤマ 森 を は 
じ め と し て 、 編 集 部 中 で その 電話 先 を つき と め よ うと する の だ が 、 い まだ に 局番 以外 は 謎 の まま で ある 。 


19 CLS:WIDTH89 , 25:LOCATE31 ,13:INPUT "YOUR NAME= " :JE$:WIDTH89,25:CB=591:X7=6:D7=3: 
RH=1:RD1=1:F=1:IT=1:S9=13:PLM=9 :KMC=9 : BHG= 1 25 :GOSUB679:LOCATE33 , 13:PRINT "WAIT A 
MOMENT" [ 

2Z9 FORGS=1TO3:READG1 ,G2:FORG=1T0329:LINE(AS, IT )-(AS、IT),PSET ,G1:LINE(AS+ 1 , IE)-(A 
S+1。I1) PSET ,G2:AS=AS+2:NEXT:AS=9:II=I1T+1:NEXT:GOTO649 

39 LINE(99、195)-(199,199) ,PSET , 4 ,B 

49 LINE(95,195)-(94.,111 ) ,PSET , 4 

59 CONNECT(99,115)-(94,111)-(199,114)-(95,115) , 4 

69 CONNECT(88,.198)-(94,197)-(199,198),4 

79 CIRCLE(49,119) ,24,1,.3.9,9,N:CIRCLE(49,119) ,8,1,.3.9,9,N:PAINT(49,114) ,5,1:PA 
INT(49,114),.9,1:LINE(44,119)-(94.195) ,PSET , 7 

89 DIMA%(799):GET@A(19,99)-(111.,121 ) ,A%,G 

99 PUT@A(19+W,149)-(111+W,162) ,A%,PSET:PAINT(94,194),1,4,7:PAINT(94,144),4,4,7 
199 DIMC%(799 ) :DIMB%(799 ) :GET@A(9.149)-(111,164) ,B%X,G:GET@A(9,99)-(111.121),C%,G 
・PUT@A(5,95)-(126,179) ,ZX%,PSET 

119 CONNECT(193.199)-(96,193)-(193,196)-(119,193)-(193,199),4:LINE(199,195)-(84。, 
116),PSET,4:CONNECT(92。112)-(99,114)-(94,116),4:CONNECT(98,119)-(99,198)-(199,19 
8)-(98.119),4 

129 CIRCLE(49,119) ,24,1,.3。9,9,N:CIRCLE(49,119) 8,1,.3,.9。9,N:PAINT(49,114),5,1:P 
AINT(49,114),9,1:LINE(44.119)-(94,195) ,PSET, 7 

139 DIML%(799) :GET@A(19,.99)-(111.121) ,LX,G 

149 PUT@A(19+W,149)-(111+W,162) ,L%,PSET 

159 PAINT(99,193) ,1 4:PAINT(192,145) ,4,4 

169 DIMM%(799 ) :DIMNX(799 ) :GETQA(9,149)-(111,164),M%,G:GETQA(9,99)-(111,121) ,N%,G 
179 LINE(1.85)-(635,83) ,PSET,7,BF:LINE( 1,139)-(635,128) ,PSET , 7 ,BF:LINE(1,175)-(6 
35 。 173) 。PSET 。7 ,。BF 

189 DIMTAX%(959 ) :GET@A(593,71)-(639,176) ,TAX,G:CONNECT(594 ,175)-(594,84)-(614,72) 
-(626,72)-(632.84)-(632,175)-(626,168)-(614,168)-(594,175)-(632,175) ,5:PAINT(699 
129),1.5:PAINT(629,179) ,1,5 

199 LINE(614,72)-(626,168) ,PSET. 5.B:DIMHX(959 ) :GETQA(593,71)-(639,176) ,H%,G 

<99 FORA=9TO2:READA1,A2,A3,A4:LINE(A1.A2)-(A3,A4) ,PSET , 7 ,B:NEXT :CONNECT( 489 , 2 ) - 
(629,29)-(559 6 ) -(489,29 ) , 7 

2Z19 FORA=1TO03:READX1 ,X2,X3:PAINT(X1 ,X2) ,X3.7:NEXT 

229 FORG=1TO59:LINE(CB, 21 ) - (CB, 54 ) , PSET , 6 : CB=CB+2 : NEXT 

239 CONNECT(499,49)-(416,59)-(476,59)-(489,44)-(436,44)-(499,49),7:PAINT(449,46 ) 
56.7:PAINT(449,46) ,1.7 

249 LINE(449,28)-(443,44) ,PSET , 2.BF:LINE( 499 , 48 ) -(494,57) , PSET , 9 , BF 

259 LINE(492.,59 ) -( 429, 46 ) 、 PSET , 2 

269 CONNECT( 443,28)-(472。.36)-(443,44) ,6:PAINT(452,36 ) , 6,6,2 

2Z79 DIMSGX%( 499 ) :GET@A(79.189)-(199,195) ,SG%,G 

289 GOSUB749 

299 LINE(1,85)-(635,83) ,PSET ,7,BF:LINE( 1 ,139)-(635,128) ,PSET ,7,BF:LINE(1,175)-(6 
35, 173) ,PSET , 7 , BF : READJF$: KMC=KMC+ 3 : IFKMC= 1 2THEN399ELSE GOTO319 

399 S59=S9+12:PLM=6 

319 LOCATE28 ,23:PRINTJF$j" VS ":JE$ 

329 PUT@A(E,99)-(111+E,121 ) ,N%,PSET : PUT@A(W,149)-(111+W,164) ,MX,PSET : PUT@A(398,5 
)-(639 。78) ,F%, PSET 

339 LOCATE19,23:PRINT"hit space key":IFINKEY$=" "THEN349ELSEGOT0339 

349 LOCATE13,8:PRINT "ヨー- イ " :FORG=9TO3999 : NEXT : GOSUB679 

359 PUT@A(79,189)-(199,195) ,SG%X, PSET : PUT@A(199,69)-(229,75) , SG%,PSET 

369 IFINKEY$="N"THEN499ELSEIFINKEY$= "M"THEN389 

379 GOTO449 

389 FORG=1TOS9: IFINKEY$="N"THEN439 

399 NEXT:GOTO0429 

499 FORG=1TOS9: IFINKET$= "M"THEN439 

419 NEXT 

429 E=E+6:GOTO0449 

439 E=E+ 1 2+PLM [ 

449 RANDOMIZE(RNDx1099 ) :TM=INT((RNDxX7 )+D7 ) : IFTM=30RTM= 50RTM= 70RTM= 90RTM= 1 10RTM= 1 
SORTM= 1 5THENTM=TM+ 1 

459 PUT@A(E,99)-(111+E,121 ) ,N%,PSET : PUT@A(W,149)-(111+W,164) ,B%,PSET : V=W+TM:E=E+ 
は 

469 PUT@A(E,99)-(111+E,121 ) ,CX,PSET : PUT@A(W,149)-(111+W,164),M%X,PSET : PUTQA(398-P 
ぅ つ )-(639-P,78) ,。F%,PSET : P=P+4:IF(475-P) く <=459THEN489 

479 GOTO369 

489 IF(111+E)=>(595- 1 )THEN549 

499 IF(111+W)=>(595- 1 )THEN689 

599 IT=I+4:PUT@A(593- 1 ,71 ) -(639-1,176) ,H%,PSET : GOT0369 

S519 DATA1 ,.5.3,.4.9,2 “ 

S29 DATA599,29,699,55,565,27,599,39,519,27,549,45,559,42,2,559,15,6,539,35.5 
539 DATA "サイ タマ チャ ンプ" " 。 "カン トウ チャ ン フ " " "ニッ ホ ? ン チャ ンプ? " 。 "トウ ヨウ チャ ンプ * " 。" セ カイ チャ ン フ < " 


テ ラッ スタッ フ 紹 介 。 バ ンプ ・ そ の 3〕 11 月 の 1 日 ころ 、 つ い に 謎 の 女性 と 本 誌 の 編集 者 が 電話 で 第 3 種 接近 遭遇 。 いき な り 、/( う 2 
曲 ! ンプ が 2、3 日 仕事 を 休む お と 告げ られ 、 当 の 編集 者 は うな ず こ くし か な か つ だ 。 パ ンプ は 5 日 まで 編集 部 に を 見 せな か つた. 
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タイ ヤ 引 き 競 争 の 続き 


PLAY"V15S8C64A19D19D19E19G19F19E19C5" 
"5 り E$ 

IFKMC= 12THENS79ELSEIFKMC= 15THEN729 
X7=X7-1:D7=D7+1:GOTO580 
X7=X7-2:D7=D7+ 1 
RH=5:E=9:W=9:CB=591:F=1:II=1:l=9:P= の 
FORG=2TO59:PUT@A(1.G)-(639.G) , SS%, PSET : NEXT 
FORG=51TO76:PUT@A(1.G)-(639.G) , SD%, PSET : NEXT 
FORG=77TO179:PUT@A(1.G)-(639.G) , SB%。PSET : NEXT 
FORG=189TO199:PUT@A(1.G)-(639.G) ,SD%,PSET:NEXT: IFRH=STHEN290 
DIMZX%(2099):GETQA(5.95)-(126,.179),ZX%,G:GOTO039 
DIMSS%(139):GET@A(1,1)-(639,1) SS%,G 

DIMSD%(139):GETQA(1.2)-(639.2) ,SD%,G 

DIMSB%(139):GET@A(1.3)-(639,.3) ,SB%。G:GOTOS99 

SOUND7 ,21:SOUND6 , 3: SOUND8 , 39: SOUND12.9:SOUND13.14:SOUND12.59:RETURN 
X7=6:D7=3: KMC=9:PLM=9@:LOCATE28 13:PRINT "GAME-O0VER" :LOCATE39.14:PRINT "WINNER 
"5 OF も :LOCATE28.15:PRINT"HIT SPACE KEY“" 

IFKMC= >18THENS9=S9-5ELSEIFKMC= >1 2THENS9=S9-12 
PLAY"V15S5C19D19A19D19B19E19G19F19E19C2":IFINKEY$=" "THEN719ELSEGOTO799 
CLS:LOCATE31 、13:INPUT"YOUR NAME= "JE$:CLS:FORG=9TO08999:NEXT:RESTORE539:GOTO5 


:FORG=9TO19999:LOCATE28 , 13:PRINT"WINNER 


LOCATE28 ,13:PRINT "YOU GET WORLD CHAMP" 
LOCATE28.14:PRINT"GAME OVER":GOTO709 
FORG= 1T02 : SYMBOL( BHG , 1 9 ) , "タイ ヤ ヒ キ キョ ウソ ウ " 5 3 。RD1 ,9:BHG=BHG+4:RD1=6:NEXT:RD1=9 
FORG=1T02:SYMBOL( BHG , 1 49 ) ," キー ソ - サ (N,M)" 5,3,RD1 ,9:BHG=BHG+ 4:RD1=3: NEXT 
FORG=1T02:PLAY"V1504B19" ,"V1505D19":PLAY"FE19"」"E19":PLAY"C19"。"G19":PLAY"E10 
・PLAY "19" 
PLAY"B19"、"O5F19" iPLAY"PE19"、"B19" IPLAYTC19"。 
PLAY"E19"。 "FE19" IPLAY"E19"。"D19" PLAYTO5C19" 。 
LOCATE19.23:PRINT"hit Space key“ 
IFINKEY$=" "THEN810ELSEGOTO8099 
BHG=125:PUTQA(593,71 )-(639,.176) ,TA%、PSET : FORG= 1T012: PUT@A(BHG,71 )-(BHG+46,17 
6 ) ,TA%,PSET : BHG=BHG+ 49:NEXT 
829 DIMF%(3399 ) :GETQA(398.5)-(639、78) ,F%,G:RETURN 


9G1M" 
"04C10" 


・PLAY"E19D12C19" 


:NEXT:PLAY "05C5"。 "04C5“" 


へ A 革 A ビ 男 錠 均 一 和 キ ー ロ < の る 。 は の る 尋 テ ミキ エー で S 光 さび ざ 党 行き ぶ で びき 時 問 


画 変 数 リス ト ・ G1,G2…… 育 景 の 中 間 色 の ・ 10 初期 設定 ・ う 。 そ れ か ら 、 ヾ N” キー を 押 
り JE お …… 自 分 の 名 前 色 ・ 20・590~660 背景 ・ し 続け る と 、 負 け 知 ら ず と な る 
CB…… 家 の 中 間 色 用 X 座 標 ・ A%.C%,B%…… ラ ン ナ ー 1 用 ・ 30-160 ラン ナー を 描く ・ の は ま ざ い 。380 行 の 最後 に 、 
X プ ,D フ …… 相 手 の 加 速 デー : 配列 ・ 170-280 ライ ン 、 ゴ ー ル 、 家 、: ELSE IF INKEY$ 
タ ・ L%,M%.N%…… ラ ン ナ ー ジ 用 ・ ヨッ ト を 描く ・ 三 \M” 和 THEN44 の 
RH…… 1 ゲー ム 目 か の 判定 用 : 配列 ・ 290-340 スタ ー ト ・ 4 の の 行 の 最後 に 
RD 1……SYMBOL 文 パ レ ・ W"… 相 手 の 速 度 ・ 350-500 メイ ン ル ー チ ン ・ ELSE IF INKEY$ 
ツ ト 用 ・ AA1ーA4…… 家 の デー タ ・ 510-530 デー タ ・ =\N” THEN44 の 
| | …… 背 景 の 中 間 色 用 Y 座 標 ・ X 1 一 X3…… 家 の 色 デ ー タ  ・ 540-580・720-730 勝つ を と ・ と 入れ よう 。 か な り 難 し く な る 
S9-…… 自 分 の 加速 割合 ・ リ F お …… 相 手 の 名 前 き の 負 理 : よ 。 難 しい 人 は 、420 一 450 行 の 
PLM…… 自 分 の 加速 時 ・ 三 …… 自 分 の 速度 ・670 波 の 音 ・ 所 の 増分 を 増やし て みよ う 。 
KMC…… 相 手 の 強 さ ・ TM…… 相 手 の 加 速 量 ・ 680-710 負け た と き の 負 理 ・ イム を 表示 させ て も いい か ガ な 。 
BHOG……SYMBOL 文 X 卒 標 ・ P…… ボ ー ト 、 ボ ー ト ハウ ス の ・ 740-820 タイ トル と ど 音 ・ (だ けち や ゃ ん ) 
SS%,SD%,SB%…… 背 景 の : X 座 標 ・ 遼 チ エッ フ ボ イン ト | 
中 間 色 用 配列 ・ | …… ゴ ー ル X 護 標 ・ DEF INT A 一 Z が 入っ て ・ 
ZX%…… ラ ン ナ ー 消 去 用 配列 : 画 プ ロブ ラム の 説明 ・ な い の で 、5 行 に で も 入れ と ご : 


(スタ ッ フ 紹介 - エイ キチ ・ そ の 1 ) エイ キチ は だ けち ゃ ん の 1 年 後 募 。 大 学 で も テ フ ポ ボリ で も そう で す 。 で も 成長 の 度合 か 
らい うと 、 だ けち ゃ ん より 10 年 は 体格 が いい と 思う 。 ま ざ ず 、 倍 は 違う な 。 


た っ た 1 台 の 戦車 で 最前 線 へ / 


FOR FM-Z/NEWZ777 


19 DEFINTA-Z:RANDOMIZETIME:H=5999:WIDTH49 ,25:E$=CHR$(254) :F$= "Front "CC も =" ェ " 


29 5=9:N=5:X=19:Y=13:LINE(9,9)-(39,24) ,E$,4,BF:LINE(27,1)-(38,23)," "8,、BF 


39 COLOR7:SYMBOL(454,24) ,F$,4.8,.4:LOCATE28,12:PRINT "HI-SC=":LOCATE33,13:PRINTH 


49 LINE(5,1)-(25.23) "9.BF:FORI=6T03:GOSUB229:NEXT:GOSUB299 :LOCATE28,15 
59 PRINT "SCORE=":LOCATE28 ,21:PRINT"SHIP=")N-1:SYMBOL(455,25 ) ,F$,4,8,6,,XOR 
69 FOR Il=9 TO3: IFSCREEN(X(!) ,Y(i) )=32THENLOCATEX(【I),Y(T):PRINT E$:GOSUB228 


79 LOCATE33,16:PRINTUSING" 提 拉 『5S:COLOR2:LOCATEX(T)、Y(T):PRINT"@":GOSUB169 


89 COLORS:Y(E)=Y(T)+SGN(Y-Y(E)):IF RND>.3 THENX(IT)=X(T)+SGN(X-X( 1 ) ) 
99 LOCATEX(T),Y(E):PRINT"@":TFSCREEN(X,Y) =234THEN139ELSEPLAY"E":NEXT:GOTO69 
100 M=9:L=9:IFC$=" ト "THENM=1ELSEIFC も ="] "THENM=- 1ELSEIFC$= "て "THENL= 1ELSEL=- 1 


110 S=S-59:COLOR2:X1=X:Y1=Y:FORT=1TO19:BEEP1:X1=X1+M:Y1=Y1+L:A=SCREEN(X1,Y1):IF 


As=254THENT=19:NEXT:BEEPB:RETURN ELSE IFA=64THEN T=16 

129 LOCATEX1,.Y1:PRINT"O":LOCATEX1 .Y1:PRINT" ":BEEP9:NEXT :RETURN 

139 LOCATEX、Y:PRINT"x":PLAY"O1C404":N=N-1: IFN く >9THENX=15:Y=15:GOT049 
149 SYMBOL(199,199),"GAME OVER",4,.5.3:IF S>H THEN HsS 

159 MHILE INKEY$ く >"Y":LOCATE19,23:PRINT "REPLAY? (Y/N) "IEWEND:CLS:GOTO26 
169 A=SCREEN(X,Y):IFA=64 OR A=32THEN139ELSE S=5-1:IFS<9 THEN149 

179 COLOR6:A$=INKEY$: IFA$=" "THENRETURN ELSE LOCATEX,Y:PRINT" " 

169 IFA$= “17ANDX>5THENX=X-1:C$=" "ELSEIFA$= "3"ANDX く 25THENX=X+1 :C$=" ト " 
199 IFA$="2"ANDY く 23THENY=Y+1:C$=" ィ "ELSEIFA$= "5"ANDY>1THENY=Y- 1:C も = "て " 
290 IFSCREEN(X,Y) く >32THEN139ELSELOCATEX,Y:PRINTC$: IFA$=" "THENGOSUB168 
219 PLAY"CR64CR64CV15":RETURN 


220 S=S+199:X(1)=6xi+5:IFRND>.5THENY(T)=23:RETURNELSEY(T)=1:PLAY"L6404":RETURN 


| %1 画 面 


め ” 史 び ヵ 


1 12131「5|! キ ー で タン ク ( 工 ) を 操作 
し て 、 大 砲 (スペ ー ス ・ キ ー) で 敵 ( 久 ) 
を や る つけ よう 。 瑞 を や っ つけ だ あと 


Hi-9ce_ 

1 8 5 BE 3 3 8 8 8 HB 8 8 8 3 旨 ら SCO0RE = 

。 、 919 
に ・ そ 原 ぼ 

= ョ ステム 訂 む あ 多 とく 

4 5 軸 用 る 具 ここ る 1 。 

sm 癌 1 ぃ い 県 3 町 大 閉 い と え I de 

1 まま 3 行人 に 社 を し 

祭り 久住 の の ら る 四 6 SI だ 4^4 

K の あ し と ( 較 ) は ブロ ッ ク に な り 破 壊 不能 。 敵 の ガ 敵 
る ー ' 

1 、 朋 ン と 人身 る 』 通っ た あほ と (@) は 地雷 で 、 あ た る と プア 役 の 

1 れ 知足 に で ウト だ けど 大 砲 消 で きる 。 砲 を 。 な に 
つう うえ 還 

1 か きま た さ ヽ 上 上 うつ だ びに マイ ナス 50、 敵 を や っ つけ 還 上 

mm つた も ん れ 郡 邊 2 

sm た の の に を る と ブラ ス 100、 Ni 

人 生 い 角 て 町 1 キミ は 何 点 取 れ る か な * ん 

カ 実 す す 菅 5 -w 25 い YY O 


中 | 


置 変数 リス ト 

nr/0 イ スズ ス だ 

Er7E0 ウ ウ の ギャ ラダ 

C お …… 自 機 の キヤ ラノ 

ご 1O の 全 是 あ ア 

N…… 上 自 機 の 残り 数 

X, Y…… 目 機 の 位置 

X( ) Y( )…… 敵 の 位置 

ML し ys 王 サ イル の 亡 同 。 増 
分 

AN PO ミサ イル の 位置 


還 プロ グラ ハム の 説明 

10~ 20 初期 設定 
20-50 画面 作成 
60-90 メイ ン ル ー チ ン 
100-120 ミサ イル 発 敵 サブ 
130<150 や だ れ た だ 負 理 、 ゲ ー 
04 mr 
自 機 物 動 ル ー チ ン 
得点 加算 。 敵 の 位置 
決定 サブ 
田 チェ エック フ ボ ポイ ント 

] 画面 を 目 一 杯 使う な ら 、 あ 
と 2 行 残 つ て いる ね 。20 行 の 最 
後に : B ミ の 、130 行 の : GOT 
〇 4 の の 前 に : B= ニ の 、195 行 に 
IF B= ニ の AND A$= 
* の 9” THEN23 の 9 の 、 230 行 
に 、。 し JUNE (5 フツ リー 


テル ゴ @ グン クジ ググ 


160 一 210 
220 


の つの 。 有 ) 。 潤 。 有 ど 。 思 
F : B ロ = ニ 1 : S= ニ ご ー1 の の の 
:GOTO4 の 


と し て みよ う 。 1 機 に つき 1 
回 秒殺 フラ ッ シ コ "が 使え る 。 
だ だ し 、 ス コア は 200 点 に な る 
ぞ 。 (だ けち ゃ ん ) 


S ジ ェ ッ トー 4 (スタ ッ フ 紹介 エイ キチ ・ そ の 2) エイ キチ は 柔道 部 に いた そう で 、 気 は や さ し く て 力持ち お 、 み だ いな 和 却 囲 気 が あ る 。 で も 、 タク 
更 厨 油断 し て いる と 、 す れ ち が いざ ま に 和 風 コ プラ ツイ スト を か ガ け られ る 、 と フー が 言っ て いる 。 


急降下 で 敵 を 倒す ニュ ー ゲ ー ム 


FOR FM-7/MEWZ/ZZ 


証 変 数 リス ト 

B( ) BB( )…… 敵 X 座 標 

CC CC( )…… 敵 Y 圧 標 

K…… 面 数 。 最初 の ミサ イル 数 

し …… ミ サイ ル 物 動 距離 

H…… 面 数 の 保存 用 

KK…… 画 面 上 の ミサ イル 数 

X, XX…… 目 機 の X 座 標 

Y, YY…… 自 機 の Y 肉 標 

V…… ミ サイ ル の 動 ぐ 確 率 

どら C 〇 use 2 

MS の サス コリ 

た お お ギー 人 人 力 用 

A…… 自 機 の 下 の キ ヤラ ンダ ・ 
clraes 

CS…… ス コア の 保存 用 

田 プロ ブラム の 説明 

どー 初期 設定 , 画面 設定 

ご 画面 作成 

UU22 メイ シン ル ー チ ン 

10-14 キー 入力 、 自 機 移動 


表示 

16-20 自 機 切 降下 、 敵 攻撃 、 
目 機 表示 

22 目 機 表示 、 敵 秘 動 判 
断 


24-30 敵 移動 、 英 表示 
30-34 敵 に や られ だ 負 理 、 ス 
コア 理 
一 チェ ッ フ クボ イント 
つの る だ し で グー ムク ム ブ 


キミ の ハリ アー(L) が サハ リン 上 上空 
で 領空 侵犯 。 キ ミ を 追い か け て くる ミ 
サイ ル (X) を 、 上 上 か ら の 急降下 で だ た た 


IN N 9W 8 BR NM RW HI W 8 8 W 8 W 8 見 2 


4 _ 1 ー バ パー と な っ つて し まう の で 、 難 
っ つの い や 品 県 
も 麻 く 上 っ は 立 - し いと 思う 人 は 、2 行 で し =3 
の の < く 、 高 喜 こら の 相 を 取り 、WIDTH4 の , 25 
1 お とる ん 飯 校 6 う ン 語 : の 後に DEF INTAーZ : 
m み 占 を 居 1 万 堂 を 校 8 が を 入れ (これ は 、 な る べ ぐ 入れ 
1 さえ 年 ge:68:19 だ ほう が よい )、6 行 の 頭 に し = 
ョ m は れ た こつ の 邊 6 ョ ュ 、 純 全 3 : D=3 : を 入れ 、30 行 の N 
大 て こ の て 飯 さ つ ぶ せ 。 使用 キー は 、LI2I3IS]、 ミ 
い と ゲ い 尾 - _ 内 多層 、 9 EXTG の 後に : D= ニ リー1 を 
まっ ん トル ョ サイ ル に 体 当 90 る きれ れる と アデ ウ ト だ けど 、 エラ 追加 、32 行 の 頭 に IF D> の 
HIT も し - キミ が 上 か ら 体 当たり すれ ば 逆 に や っ 下 月 戸 KNI4 し 嘱 を 入れ 
* で 2 か - る ララ つけ られ る 。 再 ゲ ー ム は [SI で OK。 特 M は よう 。 各 面 ご と に 2 回 まで ダメ 
< 助 も と の oi 別 馬 ゲー ム の IDI も お も し ろ い ぞ 。 。 単 ー ジ を 受け る ここ が で きる 。 
も し し で ち 作 邊 (だ けち や ゃ ん ) 


重税 、 S エ ー で は 、 オ リ ジ ナ ル の 色 、D キー で は 、 も の すご ーー い 色 で 、 オ リ ジ ナ ル よ り 見 に こい けど 、 ま だ 変わ つ だ かんじ で 楽し め 
ジレ ちゃ つ だ 。 だ めし て みよ う ! 


ムチ ャ クチ ャ 速い カッ 飛び カー/ 


計時 計 見 和 見 見 圧 2 


6 1 
部 し 作 で プ 神 
和信 川 て 旬 マ そ Z# 
中 いて 博 作 強 シ が グ 高 』 
22 明 つ オン 4 
1 く た か 刻 KG は 械 1 
』 て カ デ ん 助 ね の R 械 学 因 
2 ス は 
ns ば ャ ク と 勉 勉 『 
い | も い 強 強 
ほ E で て で ク 3 う を し 『 
1 る る すか て 
Hm 。 が K いて ま M 
| を 8 8 
1 は 82 
し 7 


| 上 上 朋 上 上 BM コ 


3 
3 
2 
< 


EEE 
4 左下 の 車 ザ キミ の レー シン グ ・ カ ー。 
ムチ ャ クチャ 速く な る か ガ ら 気 を つけ て 。 


る ガ シ ャ ー ン 。 ほ ら 、 
Ake277 つり 選 。 


び の 


斜め に 走る カー レー ス 。 ジョ イ ・ ス 
ティ ッ ク ま だ た は テン ・ キ ー で 車 を 操作 
し 、 障 害 物 を よ け て 30km を 走り 抜 こう 。 
テン ・ キ ー は [8I が アク セル 、14|6! が 左 
右 、 [2l が プレ ー キ 。 ジ ョ イ ・ ス ティ ッ 
ク の アク セル は 前倒し 、 ブ レー キ は 後 
ろ 倒 し だ 。 キ ミ は 全 行 程 を 何 分 で 走り 
きれ る か ? と に か く ム チャ クチ ャ マ 速 
く 《 な る ぞ 。 ア クセ ル を 踏み つづ け て い 
る と 月 た て も し まう は ほ と ど / 

一 プロ グラ ム の 入力 、 セ ー ブ プ 、 ロ ー ド 
に つい 


プロ 7 


ラム 


NN 
7 や 


BY 助川 博明 


リス ト は 3 種類 ある けれ ど 、 ま すず す 、 
BASIC リ スト 1 を 打ち こみ 終え た ら 、 
と りあ ぇ え ず セー ブ 。 次 に MON リターン 
と し て に *” が 出 た なら 、MDO000 リ ター 
ン と し て か ら 、 マ シン 語 リ スト を 入力 
(Add の 横 の 行 や Sum の 縦 の 行 は チェ 
ッ ク サ ム 用 な の で 打ち こま な いこ と 
最後 まで 打ち 終 を た ら 、[SHIFTIBRE 
AK、R リ ター ン で BASIC に も ど し 、 13 
ペー ジ の チェ ッ ク サ ム を 打ち こん て で 、 
CLEAR &HCFFF を 実行 し た の ち 
RUN。 マ シン 語 リ スト の 確認 を し た 
ら 、 再 び MON リ ター ン 、S DO000 D2 
FFEF DO000: MACHINK リ ター ン で 、 
セー ン し よう 。 き て で て 、 そ こ で も サ う 一度 
BASIC に も ど し て 、 リ スト 2 を 打ち 
こみ 、 こ れ も フ ァイル 名 “MAIN PR 
OGRAM" (ファ イル 名 は 正確 に /) で 
セー ブ 。 以 上 3 つの リス ト は 、 こ の 順 
番 で 同じ テー プ に モー ブ す る こと 。 

は あ は あ 、 疲 れ て きま し だ た 。 さ る あて 、 
テー プ ブ が 完成 し た ら リ スト 1 を LOAD 
し て RUN。 あ と は 自動 的 に 3 本 と も L 
OAD され ます .// そし て RUN で すね 。 


あと は 画面 の 表示 に 従 を ば いい の だ 。 


430km 走 破 。 こ ご の あこ と 、 キ ミ の 所 妥 
時 間 が 表示 され る 。 


江 ミ テッ トー / 稼 (スタ ッ フ 紹介 エイ キチ ・ そ の 3) テ フ ポ リ の 編集 部 の ある ビル の エレ ベー タ は 6 人 乗り 。 で も 、 で ぶ 大 先生 と エイ キチ と 
BBO の 3 人 が 乗る と 、 も う 座 も 乗れ ませ ん 。 


レル / 


ま / X@ ジジ ジグ ググ 


\ ッ 
2 


へ SNNRmom い OOoO 鎧 江 , 生 dm の 選 SHY 半 MIN ロ NL へ 寺 問 選 NIN ロ NN と ct+ す きす) へー 


を の 


ao 


29 '| | 
39 '| CA NNON 1 人 記 V2 、2 PCG prO9ram | 
49 '| | 
59 '| COpyright(C) 1984 by Culture Box | 
69 「'| | 
7 放 1 SHARP  X1 CZ-8FB91 or CZ-8CB9 1 | 
89 '| | 
9 " ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー プ 


199 INIT:CLS4:WIDTH 49 

119 RESTORE 219 

129 FORA=&H39 TO &H39 

139 READ A$:DEFCHR$S(A) =HEXCHR$S(A$) 

149 NEXT 

159 RESTORE 329 

169 FORA=&HD7 TO &HEF 

179 READ A$:DEFCHR$(A) =HEXCHR も $(A$) 

189 NEXT 

199 DEFCHR$(&H29 ) =HEXCHR$( "999999999999999999999999999909909999999999999999") 
299 GOTO739 

219 DATA 901822222222921C38444444444438999999999999999999 
229 DATA 99989898989898981919191919191999999999999999090990 
239 DATA 991822921C29993E3844943849497C999999999999999999 
249 DATA 991822029892921C38449418944438999999999999999990 
259 DATA 9994149976949494182848FC989898999999999999999999 
269 DATA 993E99389292921C7C4978949444389999999999909999909 
279 DATA 991822993822921C3844497844443899999999999999099969 
289 DATA 993A2294989898987C4498191919199999999999999999099 
299 DATA 991822921822921C38444438444438999999999999999999 
399 DATA 991822921A92921C3844443C944438999999999999999990 


329 DATA FFFFFCF8F9E9C989AA55A851A3478B11FFFFFCF8F9E0C986 
339 DATA FF93919999919193AA3D7ECF87CFFE9DFF9B9191999191093 
349 DATA 899999C9E4F9F9FFB9389D4FA753A855899989C9E9F9F9FF 
359 DATA 979F1F3F7FFFFFFFBAF5EAD5AA55AA55979F1F3F7FEFFFFEFF 
369 DATA FFFFFFFFFFFFFFFFAA55AA55AA55AA55FFFFFFFFFFFFFFFF 
379 DATA AASS5AAS5SAAS55AA5599999999999999999999999999999909 
389 DATA 9999999999999999AA55AA55AA55AA559999999999990909090 
399 DATA ABS57AFSFBF7FFFFF999192959A152A559193979F1F3F7FFF 
499 DATA FFFEFCF8F9E9C989AA55AAS5AAS5AA55FFFEFCF8F9E9C080 


419 DATA FFF7F5D2ESE2C9C9AASDAA7DBA5D8FSFFFFFF5DFE7EBCDC6 


429 DATA FF6763454B971591AADDBAFFBEFDEABFFF7777D54B2F7D99 
439 DATA 89E9E9A9F9FFDFFFEF4FAF47A755AA558CE6E1A2F9FFDFEF 
449 DATA 9397952FD9DFFDFFFEFDFAD5AE75AA5563D745EFDBDFEFFFF 
459 DATA FBEFE5C1E5C1C9C9AA55BA7FAA7F9F5FFFEFF5DFEDC7D6DA 
469 DATA FFFFCF8F8F139591AA55BA75FAFDFAEFFFFFEF9FFF337F89 
479 DATA CgE9E0F9F8FCFFFF8F4FA757AF57AA55CCEBE1F2F8FFFFFF 
489 DATA 919397979F1FFFFFEEDDFAFDFAF5AA552553CFF74FDFFFFF 
499 DATA FFFFFCF8F9F9E9C9AAS55A859A959A949FFFFFCF9F3F7E5C8 
S99 DATA 879391999999999182919999099919295973BFDC6C7F6CC99 
S19 DATA C9C9E9F9F8FCFFFF8959A854AAS55AA55DCCEE7F3F9FCFFFF 
oS29 DATA 93979F1F3B7FFFFF9A152A55AA55AAS5B3E7CF9F3F7FFFFF 
S539 DATA FCF9F3E7EFCF93B1A859A949A9498929FCF9F3E7EFCB9191 
S49 DATA 3BDD8ECEFC993B7792919296949D1A3S53BC584C8F8912347 
SS59 DATA B9DDEFF7FAFDFFFFB958ADS57AASSAA5589C5E2F9F8FDFFFF 
S5569 DATA EFDFBF7FFFFFFFFF6AD5AAS5AA55AA558F1F3F7FFFFFFFFF 
S79 DATA FFFFFEF8F3E7CF9FAAS5S5AA50A3478F13FFFFFEF8F3E7CF93 
S589 DATA PFF913DFEFEFEFDF9AA913CFE1E8EFC99FF913DFE1E8EFD99 
S599 DATA BFBF9FCFE7F2F8FFA131994DA752A855A1B189CDE3F2F8FF 
699 DATA F3E7CF9F3F7FFFFF3265CA952A55AA553367CF9F3F7FFFFF 
619 DATA FCFCFCFCFCFCF9F3A854A854A854A859FCFCECFCFCFCF9F2 
629 DATA 93F9FDFDFDFDFDBD92010909199091994193F9B59595955539 
639 DATA E6DC9FCFE7F3F9FEA94180949A959A854E5CA84C2E1F9F8FE 
6490 DATA SDFBF7EFDFBF7FFFA98192959A152A5531A3478F1F3F7FFF 
659 DATA FFFFFEFBE8E9E9C9AA55AA49A8498999FFDFFEEAE8E9C989 
669 DATA FFFF7F870F939793AA552A9592919291FFFF7F8597030701 
679 DATA F9E9F9F8FFFFFFFFA0949A9598A51AASS5E9C9EgF8DEF9BEFF 
689 DATA 9109391919387AFFF0991909192919A15919191919391ABBF 
699 DATA FFFFEFEDEDEDEDEDAA55BA77BE77BE77FFFFCFC9C9C9C9C9 
799 DATA FFFFFFFFBFB7B7B7AA55AA55EADDFADDFFFFFFFF3F272727 
719 DATA EDEDFDFFFFFFFFFFBE77AE55AA5S5AA55C9C9F9FFFFFFFFFF 
720 DATA B7B7B7B7F7FFFFFFFADDFADDBAS5AA5527272727E7FFFFFF 
739 CLS:COLOR4:LOCATE1.19:PRINT"Now 1oading PROGRAM "ECOLOR2EPRINTTOE "ECOLORS 
・PRINT"MACHINE LANGUAGE" 

749 COLOR9 ,9 

759 LOADM"MACHINE" 

769 COLOR1:LOCATE5.15:PRINT"Now 1oading PROGRAM "ij ECOLOR6:PRINTTOE "5 ECOLOR4 :PRI 
NT" BASIC" 

779 COLORW 、9 

789 RUN"MAIN PROGRAM" 


や 光っ ビー (スタ ッ フ 紹介 。 で 上 ぶ 大 先生 ・ そ の 1 ) この と ころ 添削 に 燃え て いる で 記 大 先生 の 机 の こと を 、 編 集 部 で は 「 腐 海 」 と 呼ぶ 。 
提 仙 1 知ら な い 人 は それ を 聞い て 「 不 快 」 と 書 こ て の だ と 思い が ち だ が 、 実 は ど つ ちの 字 で 書い て も ビッ タリ な の だ 。 


199 
119 
129 
139 
1 49 
159 
169 
179 
180 
199 
2909 
210 
220 
239 
249 
250 
2609 
270 
289 
290 
399 
3109 
3209 
339 
349 


テッ 
表 個 9 


C A NNON B ALL malm PrTO9ram 
Copyright(C) 1984 by Culture Box 


SHARP X1 CZ-8FB91 or CZ-8CB9 1 


WIDTH 89:INIT:KBUF OFF:CLICK OFF 

CLS4:DIM NAM$ ゃ も (2) ,TI(2):TI(9)=149:TI(1)=179:TI(2)=2099 
NAM$ も (9)="Culture Box" 
LABEL" JOY SELECT" 
WIDTH89:COLOR4 :LOCATE9 , 2 
PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

COLOR6 : LOCATE9 , 1 2 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

SOUND9 , 1 6 : SOUND1 , 2 : SOUND7 , 62 

TEMPO199:PLAY"V1305GECGECGEG2E2: V904AFDAFDAFA2F2:V707F3B3F3B3" 
COLOR2:LOCATE27 ,.23: INPUT "JOY STICK 9,.1,.2 ":ST:IFST く >9ANDST く >1ANDST く >2THEN349 


ァ 


一 変数 リス ト ( メ イン ブロ グラ ム ) 
NAM )…… 上 位 コ 位 の ネー ム ハ 
1 CsE 人 MS の タイム 


YR ダイ ム の 分 " の 部 分 

の …… タ イム の 秒 ” の 部 分 

ら 「……: 使 用 する 入力 装置 

A お や …… マ シン 語 の 書き 込み に 
使用 

B、C……POKE さ れる 乱数 
(F003、F004) 

一 プロ グラ ハム の 説明 

100 て 120 初期 設定 

130 て 310 タイ トル を か ガ かぐ 

320-330 SOUND 文 

340-350 入力 装置 の 選択 

360~590 それ ぞ れ の 入力 装置 
に あつ だ マシ ン 語 書 
き 込 み 

600-640 背景 の ライ ン を 引く 

650-910 PCG の 画面 用 初期 
設定 

920 て 960 マシ ン 語 を call す る 
まで の 初期 設定 


(スタ ッ フ 紹介 で ぶ 大 先生 ・ そ の 2) で ぶ 大 先生 は 添削 が お わる と 自ら RUN し て 見 せ て ぐれ る の だ が 、 前 回 は FN エラ ー 刀 ア 
ガ 出 だ 。「 今回 は そん な こと あり ませ ん よ 」 と 自信 満 マ RUN し て くれ だ けど 、 今 度 は Subscript Out of Range が ガ 出 だ 。 


空 / X 久 レン ジジ ググ 


ddRmOtmND 生 テ SHV 半 FNIN ロ Nd 深き 0 衣 ぶ verrvrv は サテ MIA 有三 濁 光 と MINL ロ N 届 若き ③%T 


CANNON BALL の 続き 


に / 
970 マシ ン 茹 Cal. 359 ON ST+1 GOTO "TENKEY","JOYSTICK1" "JOYSTICK2" 


980ー990 ゴー ル し だ か 、 ぶ つ 369 LABEL"TENKEY" 
379 RESTORE499:FORA=&HD99CTO&HD9CD 


かつ だ か 判断 する 389 READ A$:B=VAL("&H"+A$) 
2 ・ 399 POKEA,B:NEXT:GOTO"GAME START" 
1000-1090 ぷ つ か つ だ と き の 499 DATA 91.99.19,ED,78.D6.31.,47 
処理 419 DATA 19,.93,C3,DC、D9,95.19,93 


429 DATA C3.F2.D9,95,19,93,C3。E6 
1400-1330 ゴー ル し だ ただ とき の 439 DATA D9,95,19,93,C3,CE.D9,C3 


処 理 449 DATA 16,D1,99,99,99,99.99,99 
' 6 459 DATA 99,99,99,09,99,00,99,99 
娘 プ ログ ラム マッ プ (マシ ン 語 ) .469 DATA 99,99 
479 LABEL"JOYSTICK1" :GOSUB"STICK DATA":GOTO"GAME START" 
UOOO~DOOE 自分 の 車 の 位置 489 LABEL"JOYSTICK2":GOSUB"STICK DATA" :POKE&HD9A6, 8&HF :GOTO"GAME START" 
の 剖 定 4 LABEL"STICK DATA" 


、 599 RESTORE539 :FORA=&HD99CTO&HD9CD 
DOOF^DO2C 自分 の 車 を 消す 519 READ A$:B=VAL("&H"+A$) 


9 529 POKEA.B:NEXT:RETURN 
UO2DCUOSE スプ ロー ル 539 DATA 91.99,1C,3E.9E,ED.79.95 
DO5F こ DO9B_ ぶつ か つた か の 549 DATA ED,58,7B,D6,F5,47,19,93 
放 559 DATA C3,E6.D9,19,93,C3,E6,D9 
判定 569 DATA 95,95,19,93,C3,F2,D9,19 


、 579 DATA 93.C3.F2.D9.95,19.93.C3 
DO9CCDOCD キー イン (入力 装 | 58g pArTA pc.Dpg.19.93.C3.CE,D8 !C3 
置 に 599 DATA 16.D1 
こよ り BASIC 699 LABEL"GAME START":・ 


より 書き 込ま われる) | 619 wIDTH49 : SCREEN : PALET : COLOR7 :CGEN1 : PRM1 4 


629 FORA=9TO199STEP8 :LINE(9-A,A-299)-(299-A,A) ,PSET ,4-((A MOD 3)+1) :NEXT 

DOCE<DODB スズ スロット ドル 639 FORA=9TO191STEP8:LINE(328-A,A)-(528-A,199+A) ,PSET,4-((A MOD 3)+1):NEXT 
DODCCDOE5 ブレー キ 649 LINE(224,191)-(272。199) ,PSET , 9,BF 

5 650 FORA=9T0999 :POKE@Q&H2999+A,39:NEXT :LOCATE9, 9 
DOE6CDOF1 ステ アリ ング ( 右 ) 669 PRINT" ワ ワリ ワ ワ ワ ワ ワ ワ ワ ワ ワリ ワ ワ ワリ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ~ HHHHHHHHHHHHHH" : 

679 PRINT" ワ ワ ワ ワ 7 ワ 7 ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ~ HHHHHHHHHHHHUUH* " : 
DOE2DOED ステ カリ ング z) 689 PRINT" ワ ワリ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ~ HHHHHHHHHHHHHH ロ * ン " : 
DOFE<D115 ステ アリ ング の 699 PRINT" ワ ワ ワ 7 ワ 77 ワ ワ ワ ワ ワ ワリ ワ ワ ワ ワ ワ ワ ワ ~ HHHHHHHHHHHHHH* ン ン " 


0 799 PRINT" ワ ワリ ワリ ワ ワ ワリ ワ ワ ワ ワ ワリ ワ ワ ワリ ワ ワ ワ ワ ワ ~ HHHHHHHHHHHHHH ロ * ン ン ン " : 
きり すぎ か どう か 719 PRINT" ワ ワリ ワリ ワ ワ ワリ ワリ ワ ワ ワリ ワ ワ ワ ワ ワ ワ ワ * HHHHHHHHHHHHHHUH* ン ン ン ン " : 


2” 
の チェ ッ フ 729 PRINT" ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ワ ~ HHHUHHHHHHHHHH ロ * ン ン ン ン ン " 
739 PRINT" ワ 77777 ワ 777 ワ 7 ワ 777 ワ 7 ワ ワ 7 ワ ~ HHHHHHHHHHHHHHH* ン ン ン ン ン ン ") 
D116CD145 自分 の 表示 749 PRINT" ワ ワ 7 ワ ワ 7 ワ ワ ワリ ワ ワ ワ ワ ワ ワ ワリ ワ ワ ~ HHHHHHHHHHHHHHH" ン ン ン ン ン ン ン "5 
759 PRINT" ワ 777 ワ 777 ワ ワ 7 ワ ワ 7 ワ ワ 7 ワ ~ HHHHHHHHHHHHHHH" ン ン ン ン ン ン ン ン " : 
D146CD15B _ スクロール す る 部 769 PRINT" ワ ワ 77777 ワ 77 ワ ワ ワ 7 ワ ワ *^ HHHHHHHHHHHHHHH* ン ン ン ン ン ン ン ン ン 『": 
分 を OLS 779 PRINT" ワ 77777 ワ 7 ワ 7 ワ 7 ワ ワ 7 ワ ワ ワ ~ HHHHHHHHHHHHHHH" ン ン ン ン ン ン ン ン ン ン "5 
789 PRINT" ワ ワ ワ 7 ワ 7 ワ ワ ワ ワ ワ ワ ワ ~ HHHHHHHHHHHHHHH" ン ン ン ン ン ン ン ン ン ン ン ": 
D15CCD176 乱数 に より 障害 物 799 PRINT" ワ ワ ワ 77 ワ 7 ワ ワ 777 ワ ~ HHHHHHHHHHHHHHH? ン ン ン ン ン ン ン ン ン ン ン ン " 
899 PRINT" ワ ワ 7777 ワ 77 ワ 77 ワ ~ HHHHHHHHHHHHHHH" ン ン ン ン ン ン ン ン ン ン ン ン ン " 
を だ す ガ 決定 する 819 PRINT" ワ 77777777~ HHHHHHHHHHHHHH* ン ン ン ン ン ン ン ン ン ン ン ン ン ン “ ) 
2 宇 829 PRINT" ワ ワ ワ 7 ワ 7 ワ 7 ワ ワ ~ HHHHHHHHHHHHHHH* ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン "・ 
017 た DAE 障害 物 の 種類 を 839 PRINT" ワ 77 ワ 777~ HHHHHHHHHHHHHHH" ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン "5 
決定 、 表 示 849 PRINT" ワ 7777 ワ *~ HHHHHHHHHHHHHHH* ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン " 
859 PRINT" ワ ワ ワ ワ ワ ~ HHHHHHHHHHHHHHH* ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン "5 
D1AF<D1E3 パレ ッ ト の 切り カ え 869 PRINT" ワ 777~ HHHHHHHHHHHDHHH* ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン " : 
が プッ 879 PRINT" ワ 77*~ HHHHHHHHHHHHHUHH" ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ": 
UTE4CD1FD サウ ンド 889 PRINT" ワ ワ ~ HHHHHHHHHHHHHHH* ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン " : 
D1FECD214 WAIT 899 PRINT" ワ ~ HHHHHHHHHHHHHHH* ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン ン "・ 


999 POKE@&H33C9 , 222: POKE@&H33D9, 223 221 221,221 ,221,221 ,221,221。221,221,221。221 
D215CD260 走り きつ だ か ど 919 POKE@&H33E2,221 , 221 ,221 ,221 ,221 ,221 
う ガ の 判定 929 TIME=9:POKE&HF999, 4 ,199, 1 
939 B=INT(RNDx19) :C=INT(RNDx255 ) : POKE&HF993,B,C:POKE&HF995,13,183。1 


Do61<D2A2 残り の 距離 を 表 949 POKE@&H33DD,59.57,57,.57:LOCATE9 , 9 
に 959 SOUND1 ,9:SOUND2 , 49 :SOUND3 , 9 : SOUND4 ,9:SOUND5 , 9 : SOUND6 , 6 


志 969 SOUND7,54:SOUND8,31:SOUND9。21:SOUND19。21:SOUND11。1:SOUND12。19 
ai 70:NCAELRNDO (ニラ ーー ニー ンー ニー で ーー ドー 
プー の エル 98 A=PEEK(&HF991 ) 
FOOO 車 の 位置 (1 6) 999 ON A+1 GOTO "GOAL" , "CRASH" 
、 1999 LABEL"CRASH" 
FOO1 スロ ッ ト ル ( 氷 さ ), 1919 SOUND9,169:SOUND1 ,15:SOUND2,232: SOUND3。3 
ゴー ル ガ フ ラッ シュ 1929 SOUND4,19:SOUND5,9:SOUND6, 19 : SOUND7。33 
6 1939 SOUND8, 23:SOUND9 , 23: SOUND19,31:SOUND1 1 ,29:SOUND12,79:SOUND13.1 
FOO02 障害 物 を 表示 す 1949 A=PEEK(&HF999 ) 
1959 A=A-1 
る と き の 位 置 1969 FORZ=9T09:LOCATE8+A,17+A:PRINT"@O": :LOCATE8+A,18+A:PRINT" 和 の "iPAUSE .5 
上 1979 LOCATE8+A,17+A:PRINT"$ ま "LOCATEA+8。18+AEPRINT" "iPAUSE. 5 :NEXT :LOCATE9 , 9 
FOO3yFO04 乱数 1989 POKE&HF991.199 
FOO5~-FOO6 残り の 距離 1999 LOCATE25 ,9:PRINT "HHHHHHHHHHHHHHH" : :KBUF OFF:GOT0959 
119 LABEL"GOAL" 
一 チエ ッ フ ボイン ト 1119 CGEN8 :COLOR6:LOCATE19,5:PRINT"G 0 A し " 
ュー こ ム へ 1129 PAUSE 15 
うー む 、 マ シン 語 を 使 つ て あ 信和 


る だ け あ つて スク ロー ル は メチ 1149 T=TIME 
1159 GOSUB1299 :COLOR4 : LOCATE2,1:PRINT"Your time"i:COLOR6:PRINTT2:" 分 "iT1i 7 秒 " 


ヤン コ 速 いね / も うほ こん ご ど 1169 IF T<TI(2) THEN 1179 ELSE 1229 
テバ 1179 SOUND9 , 16:SOUND1 , 2 : SOUND7,62 
自分 の 車 が 見 え は ぐ な つて し ま 11896 TEMP0429:PLAY"V1205C3R1C3D7C4R1C4D7C4R1C4R1C4:V905E3RIE3F7C4R1E4F7E4R1E4R1E 
う の に は 皆 ア 然 、「 流星 号 を 思い 4 : V706G4A4G4A4G4A4G4A4G4A4G4" 
Ye: 1199 COLOR1 :LOCATE3,23: INPUT"Your name ":NAM$(2):TI(2)=T 
出す な ア 」 と 言 つ を の は 、 昭 和 1299 IF TI(2)<TI(1) THEN SWAP TI(2),TI(1):SWAP NAM$( 2 ) , NAM$( 1 ) 
3 X 年 生ま れ の パン プ で し た 。 1219 IF TI(1)<TI(9) THEN SWAP TI(1),TI(9):SMAP NAM$( 1) ,NAM$( 9 ) 


- 1229 COLOR3 : LOCATE19,5:PRINTNAM$(9 ) 
だ だ ちよ つと 道 の 幅 が 狭い の と 、 1239 LOCATE19 ,8:PRINTNAM$( 1 ) 


Sa 二 が 1249 LOCATE19.11:PRINTNAM$( 2 ) 
ジャ マカ ー ガ 静止 し て いる の は 1259 T=TI(9) :GOSUB1299:COLOR5 :LOCATE15.6:PRINTT2:" 分 "TE7 秒 " 
残 菅 だ つ だ な 。 1269 T=TI(1):GOSUB1299:LOCATE15,9:PRINTT2:" 分 "の Ti" 秒 " 
1 1279 T=TI(2):GOSUB1299:LOCATE15,12:PRINTT2:" 分 "iT1E7 秒 " 
お あつ と 、 助 川 君 は 、 マ シン 語 1289 GOTO1389 
= 1299 T1=T MOD 69:T2=T-T1:T2=T2/69: RETURN 
| 

を 解析 する こき は 、 テ ボリ 8 1399 CFLASH1 :COLOR2:LOCATE19 ,29:PRINT"HIT RETURN KEY" 
月 号 の テ フ ポ リ X 1 を 読ん で ご 1319 REPEAT:UNTIL INKEY$=CHR$( 13) 

0 1329 CFLASH9 
だ さい と 計 つ て いる ぞ 。 (の ー) 1339 GOTO"JOY SELECT" 
ヶ 2 テット 4 スタ ッッ フ 紹 人 で 3 大 先生 ・ そ の 3) ボ シ エ ッ ト で も テク ボリ 本 訪 で も 使わ れる "ムズ イ 」 と いう 形容 詞 は 、 実 は で ぶ 大 先 


昌 瑞 生 の 発明 。 は つき り と し だ 意味 も わか ひら ずみ な で 使っ つて いる けど 、 本 人 も 本 当 は よこ わか つて な い 、。 


リン ゴ が 動く な ん て そん な …… ノ 


る ジジ 遊び 方 


な せ ぜ ヵ 動物 化し て し まっ た リン ゴ を 狂 
っ て いく ゲー ム 。 面 数 と 同じ 数 の リン 


る 


mm mn ni in nm mm ia の 


19 WIDTH 49:INIT:SCREEN 9.9:CLICK OFF:DEFINT A-Z:DIM PX(63) ,A(59) :L=0:K=9:S=9 
DEFCHR$(32 ) =HEXCHR$( "000909000900099000009909009990009900990909999000") 


29 DEFCHR$(35 ) =HEXCHR$( "FFFFFFFFFFFFFFFF9909999999909999EEEEEEB9BBBBBB99 " ) 
25 DEFCHR$(36)=HEXCHR$( "989618FF3C3C6699183C188199909969183C18FF3C9999C3" ) 
39 DEFCHR$(37 ) =HEXCHR$( "090999992920009999096PEFFFFFFF7E3C681919020209563C" ) 
35 DEFCHR$(38 ) =HEXCHR$( "9999183C3C1899090999183C3C180909990909919109999090" ) 


49 CLS4:LINE(198.52)-(188,116),PSET,7,B:K=K+1:KA=K:LOCATE 5.18:PRINT "サン ソ " ECGEN1 
45 SCREEN,1:CLS:LINE(3.2)-(36,21), "BEF:LINE(4.3)-(35.26)," ",B:FORY=7TO15STEP4 
・LINE(5,Y-(34,Y)」" 「 ENEXT:FORX=8T033STEP4:LINE(X,4)-(X,19)." "ENEXT:FORW= 1TOKA 
59 Ps&H347C+INT(RNDx29)+40xINT(RNDx16):IF PEEK@(P)=35GOT059 ELSE POKE@ P,37:A(U) 
=P:NEXT:X=9:Y=6:FOR W=1TO3 

S5 P=&H347C+INT(RNDx29)+49xINT(RNDx16): IF PEEK@(P)=35GOTO55 ELSE POKE@P,38:NEXT 
69 SCREEN9,9:CGEN:LOCATE35,1:PRINTK:O0=259:LINE(26,168)-(275,168 ) ,PSET, 2 

65 Z=STICK(L):X1=X:Y1=Y:X=X+(Z=4)-(Z=6):Y=Y+(Z=8 )-(Z=2):PLAY 6509-29X0:PLAY "07C 
4"FOR WM=ITO K:T=A(W):IF T=9GOTO 75 ELSE A(W)=A(W)-41+1NT(RNDx3)+49xINT(RNDx3) :C= 
PEEK@(A(W)):IF C=35THEN A(W)=T ELSE POKE@ T,32 

79 IFA(M)=&H347C+X+49xY THENPOKE@A(W) ,32:A(W)=9:KA=KA-1 :5=S+19ELSE POKE@A(W) ,37 
75 NEXT:LOCATE14,1:CGEN:PRINT "SCORE" :S: IFKA く 1THENS=S+ INT(0/19)x19:PAUSE8:GOTO49 
89 SCREEN, 1 :GET@(X,Y)-(X+8,Y+6) ,PX:C も =CHARACTER$(X+4,Y+3): TFC も = "THENX=X1:Y=Y1 
685 CGENI :SCREEN,9:PUT@(14,7)-(22.13) ,PX:LOCATE18,19:PRINT"$":IFC も = "8 "THENPOKE@&H 
3494+X+49x(Y+3) ,32:GOTO69ELSE0=0-2:PSET(0+26.169.9) :PSET(0+27.169.8):1FO GOTO65 
99 CGEN:COLOR 3:LOCATE 14.8:PRINT "GAME OVER":LOCATE 12.15:COLOR 6:PRINT "PUSH S 
PACE KEY":IF STRIG(L)=9 GOTO99 ELSE RUN 


SCORE 2418 


テン キー で 上 トト 左 右 に 動き な が ら 、 


1 の 6 

! 麻 ト あて 全 

1 まる 8 な 

を 9 も し - ゴ を 狩れ ば 面 ク リア で 、 残 り 酸素 量 に で 
| まあ X m 応じ た ボー ナス が 入る よ 。 還 
1 3 ます! 道ばた に 落ち て いる 球 を ひろ うと 、 か 
[44z れれ な うっ 上 琶 来 が 供給 され る けど 、 グ ズ グ ズ し て ば 
1 4 まい る に リ ン ゴ に と られ て し まう ぞ (な 7 
IN い R は だ ただ ん に リ ン ゴ も 動く の だ 酸素 が 切れ る 

1 と す コ に の み ジ ンク EC つい 0 


cOS は LV てこ y 


重 


一 変数 リス ト 
X,。 Y…… ハ ンタ ヤー の 座標 


K…… ら CENE 数 
KA…… 残 り の リン ゴ 数 


有 …… キ ー ス キャ ヤン 用 
A( )…… リ ン ゴ の 座標 
C…… リ ン ゴ の キャ ラク 
(Aowe キア ツー の ギヤ セラ ンタ 
P%( )…… 画 面 デ ー タ 
還 プ ロブ プラ ハム の 説明 
10 初期 設定 
15<35 キャ ヤラ クタ 定義 
40<60 画面 作成 、 他 
65<75 ハン ター、 リ ン ゴ の 秘 
動 、 ス コア アツ プ 、 和 面 
グリ アル 判断 
画面 表示 、 ゲ ー ム オー 
バー 判定 
90 ゲー ム オ ー バ ーー 処理 
田 チ ェ ッ クボ イン ト 

うー お む 、 ご これ で は 壁 が ゴ の へ だ 
ね 。 そ れ に 、 リ ン ゴ の 残り 数 も 
表示 し た い 。 少し 改造 し て みよ 
う 。75 行 を 次 の よう に …。 


60 一 65 


NEXT:LOCATE4, 1 


:・CGEN:PRINTUS 1 


NG SCORE 北 半 壮 半 
人 K 戸 妃 E 選 . 夫 療 

SI AOE 26) AA 

そし て 、80 行 を 

SCREEN。 1 :C ま テテ CH 

ARACTER$ (X+4, Y 

十 9) : IFC お ニテ *#7 丁目 


EN メニ X1 : ヤニ Y1 

で 、81 行 を 付け 加え ます 。 

ら ビ | @.( 久 /。 YY) ( キ ら 8, 
士 6) 。 PF) 1F ビ KA で 1 
THENS=S 二 INT (0 プン 
1 の ) w*1 の :PLAY ヾ ES 
DCDEREREY に GOTO 
4 の (パン ノ ) 


N 酸素 を 表 う ツイ ミン グ が 、 長生 き の 秘 け つ だ ね 。 壁 が ゴム み だ い で 、 ぷ ぶ つか る と 、 中 に め り こ ん で し まう 。 ゆ み は あ わ て ん ぽ 好 3 
うだ か ら 、 め りこ ん で ば つか 。 あ わ て れ ば あわ て る ほど 、 自 分 が 進み たい 曲がり 角 に は 行け げす 、 じ だ ば だ し て し まい まし た 。 


ば / Xe クシ シン クジ 


だ ん だ ん 難しく な る 思考 型 ゲ ー ム 


NY を し 


4 メア ) 
WM 4 イノ の 
さ ンー 


AA 
ワ 


FOR Xeusc 


19 DEFCHR$(106 ) =HEXCHR$( "099909999999099EFEFEF99FEFEFE999009909999099009" ) 


2 DEFCHR$(161 )=HEXCHR$("8462600960996009900829109818193C3C76DFEF76248088") き …… ス コア 

3 DEFCHR$(224 )=HEXCHR$("7E3C3C7EDBFF663C66999492099999997E3C3C7EDBFF663C") ME…… 面 数 

48 『 あ (2280. 時 0 和 183707E 和 RDC 

59 VIDTH 49:CLICKOFF:PL=0:ME=1:Pz1:He5:XE<9:S=6:TBMPO358 F, G…… 並 塊 の 辱 標 
69 CLS4:X=29:Y=12:E=9:U=25+P:CGEN1I HH…… 和 金塊 の 数 

76 FORB=1TOU:M=INT(RNDx36+2):N= INT(RNDx21+2) :COLOR7:LOCATEM,N:PRINT"e":NEXT M, N……・ 木 の 忠 標 
89 COLOR7:LINE(1,1)-(38,23) ,"d" 。B:FORT=1TOH:FsINT(RNDx36+2):G=INT(RNDx29+2) :COLO U…… 木 の 数 
R7:LOCATEF,G:PRINT"$":NEXT :CGEN8 P…… 面 フリ ワウ に よっ て 増え る 
99 CGENI:OOLOR7:LOCATEX,Y:PRINT"@":Z=STICK(@):X1=X:YI=Y:CGENB:LOCATE1,9:PRINT"SC 
ORE":S: "STAGE" ME "アト "5H-ME+1-Ei "コリ ミリ ノコ リ "3-XE" ニ ン " 木 の 数 

198 IFZ=2THENY=Y+1ELSEIFZ=4THENX=X-1ELSEIFZ=6THENX=Xt1ELSEIFZ=8THENY=Y-1ELSET29 XE…… パ ス し だ 回 数 
119 CGENI :LOCATEX1,Y1:PRINT"d" :CGEN8 ヒ …… 取 つ だ 金 の 数 


120 D$=CHARACTER$(X,Y):TF STRIG(8) THEN 178 
-139 IFD$="e"ORD$="d" THEN166ELSEIFD$= "$"THEN1 49ELSE98 

149 S=S5+19:PLAY"C3A2R":E=E+1・IFE=H-ME+1THENPLAY"A5BSC5D5E5F5D9:D7A9A9"ELSE99 

156 LOCATES,12:PRINT"BONUS 1900":S=S+1699:ME=ME+1 :P=P+35:H=H+6:PAUSE30 : IFME=30RM 


998 ステ ィ ッ ン 関 数 用 
X1, Y1…… 新 し い 壁 の 座標 
D お …… つぼ が あ だ つ だ 物 の 判 


E=60RME=16THEN196ELSE69 断 
169 X=X1:Y=Y1:GOTO 96 2 ー 
17 XE=XE+1:IFXE>3THENPLAY"G6C6RC6E6C6RC6B6:R6G6C6RC6E6C6RC6E6" ELSE66 「 1907 ナス 
186 LOCATE12,12:PRINT"HIT SPACE KEY":IFINKEY$=CHR$(&H29)THEN56ELSE179 一 ブ ロブ ラム の 説明 


10- 40 キヤ ラク 定義 
950 60 初期 設定 

70 一 90 画面 作成 
100-110 つぼ の 移動 
120 一 130 衝突 判断 


140ー150 金塊 を 取っ た と き の 
N SN 各 理 、 面 クリ アガ か 
NN 遊び 万 記 5 っ 隊 計 160 笛 突 旭 


196 CSIZE3:F=MEx1669LOCATE9,16:PRINT 提 ," "LOCATE2.16:PRINT#6, 
"SPECIAL BONUS"iF:S=S+F:PLAY"C4E4G6R1G6R1G4E4C4D4E6D6C8 "PAUSE28:CSIZE9 :GOT068 


170 こ 180 パス し た と き の 娘 理 、 
森 の そこ ら 中 に 落ち て いる 人 金塊 を [21 


ゲー ム オ ーー 処理 

MM CH で 間 002 の ダグ 190 ” スペ シャ ルポ ボー ナス 
AO - 。 で 。 。 : 議 還 と ジン と 2 

kt RE は 面 フ リア する と 、 木 の 数 ガバ 


* 


と まま 5 9 8 W 上 W B き 8 BW 上 四 


ツ と 増え る が ガ 、 こ れ は 、 150 行 の 


4 6 = 0 

5 ッ $ 田 | 重 学 {お ぼ SPEC RaL .BONUS 3gge Pー ニ 35 の 値 を か える こと 
1 ば ン い 賀 ザ 校 は の 8 = に よっ つて 、 増 減 で きる 。 

ョ ^ 横 し Ma | | wm スコ ア な どの 表示 が いま いち 
まそ に よ ゎ 1 に 引 ( 室 = ノー 
うな う ん 松 ユ 青 oO を は 邊 ー ェ カツ コ 趣 い 。 ちこ ん 90 行 の し 
Il 和 四 っ ム 。 も 桂 マ ョ べ ム OCATE 1, の : の あと を 、 
| ュ し と TITTIT ヤ IO フ 0「D「TO て - - は , 才 KN と KK いか の てく る >/ ジ PR INTUS TING い SO 
> > 2 と が ある か ら 慎 重 に 。 9 しま の 0 か ル ら 5 ORE# 半 # せ 半 # STA 
1「 えき だ の 2 < な っ た ら ス ペー ス ・ キ ー (これ は 自 ポ 、 GE## :GOLD## 
の "を が 向 朋 の キー な の だ )。 3 回 自殺 し た ら ゲ ナ 庫 VASE##?:S:ME:H 
半 生生 1 ーー. 調 ア ー ム は ゃ っ ぱり く 。 ス で  ーME+1E:3ーXE 

』 ん を と けん 6 2 も は と 変え て みよ う 。 (バン プ ) 
・ ビン 0 3 ス 


ト II 8 MI MM 8 BI BI iM 8 BE BB ll 8 っ 


ヶ や っ 4 タッ フ 紹 介 ゆみ ちゃ ん ・ そ の 1 ) ゆみ ちゃ ん は か らい 食べ も の に 弱い の に 、 み ん な が カレ ー を 食べ に 行く と ニコ ニコ レ 
提 面 な が ら つ いて き て 、 ソ フト マイ ルド を 頼み ます 。 そ し て ハン カチ で 涙 を ふき な が ら 、 必 死 で 全部 食べ る の で し た 。 


2 


ヽ さ 
遊び 万 人 ニ ーーーーーーーーーーー- LTFEGME = ニー ニニ ニニ ニニ ニニ ニニ ュー 


RUN の あと 、 タ イト ル が 出 た ら リ タ 
シギ キー。 や き な り ラテ イフ ゲ テス 
ちゃ う の だ 。 一 時 スト ッ プ は スペ ー ス 


と 』I 1 IM MI M 」 


4 | 1 日 
}) い の 2 | た に - 
ョ mp 乙 れ を 役 あぶ め 』 
1 流 年 プ な が 表 女 プ / ィ て W 回 
1 いと の て いえ の グ ぁ 負 』 自 
ュ グ 上 茂 投 回 
39 た べく 前 4581 上 
『 る 月 1 四 
こう 、 ン 
だ お 出 7 を 。 ・ キ ー、 還 II 止め て か ら 還 を 押 形 パ 
ャ リャ ) ら 7 て す と 初期 画面 に も どり 、 シ フト +CLR 成 パ 
パー た を で HOME で 画面 消去 。 モ ッ ト は カー ツル 甘 る 
ロ も う に リー 、」 を 動か し て any key。 リ セッ ト は スペ る と 
Hb で * ゃ ョ ー ス ・ キ ー だ 。 い ろ い ろ 試 し て ね だ 5 
@ X い 私 X つ っ 』 人 この 


テッ 
更 個 ! あ 


〔 ス タッ フ 紹 介 プ ゆみ ちゃ ん ・ そ の 2) ゆみ ちゃ ん は 草 月 流 の お 花 を 習 つ て いて 、 カ プス カウ ト の リー ダー も や つて ます 。 あ ケ ク 
まい の も か らい の も 絞 い の に 、 お 洒 を 飲み な が ザ ら イカ の 塩 か ら を 食べ る の が 好き で 、 要 する に よ ぐ わか ら な い お 姉 さん で す 。 


イフ ゲー ム が 手軽 に 楽し め る 


FOR 大 」 シリ ー ズ ou-BAS/C 


19 CLEAR &HCFFF:CLS 4:INIT:WIDTH 49:DEFINT A-Z:G=0:GOSUB 89 
29 CLS:FOR 1=1 TO 8:FOR J=1 TO 8:T$=MID$(CGPAT$(ASC(MIDS("LIFEGAMET 1))).J.1) 1 
FOR K=1 TO 8:T=VAL(MID$(RIGHT$( "99999909"+BIN$(ASC(T$) ) 8) ,K、1) ) :LOCATE IX8+K-37 
-(1 く <5)x32,J+12+(I く 5)x9:PRINT CHR$(32+T) :NEXTENEXT:NEXT 

39 LINE(9,9)-(39,24) ,CHR$(34 ) ,.B:LOCATE 15.9:PRINT " LIFEGAME ":LOCATE 17.24:PRIN 
T " 9999 “・:CONSOLE 1.23.1.38:PRINTCHR$(11) 

49 1$=INPUT$ も (1):IF 1$=CHR も (13) GOTO 59 ELSE IF 1I$>CHR$(32) THEN PRINT "11:GOTO 


49 ELSE PRINT I$::GOTO 49 ' >>>>>>>2>2 "アンプ くく < くく < くく くく 


59 CONSOLE:GOSUB139 :POKE&HD954 ,237,129,119:CALL &HD848:POKE&HD954 126、237 ,121 

69 REPEAT:CALL &HD999:LOCATE 18,24:PRINTUSING"xx 提 "1GS EGG+1:UNT EL STRIG(9 ) 

79 I$=LEFT も (INKEY$+" "1):TF INSTR("Ee イ "1$) く >9 THEN END ELSE IF INSTRC"Nn ミ "1$) 
く >9 GOTO 69 ELSE IF INSTR("Rr ス " 、1$) く <>9 THEN G=9:CLS:GOSUB149:GOT039 ELSE GOTO79 
89 COLOR 7:LOCATE 13、12:PRINT "ジリ バラク 4 ガチ クダサイ":FOR !=9 TO 1:READ M$:FOR 9 TO 6 
4:POKE &HD099+Ix65+J,VAL("8&H"+MIDS(M も ,Jx241.2)):NEXTENEXT 

99 S$=HEXCHR$( "9999999999999999"):FOR 1=32 TO 996:C$="T:FOR =1 TO 8:C=ASC(MID$(C 
GPAT も (『) ,J。1 ) ) :C$=C も +CHR$(C OR C/2):NEXT:DEFCHR$S(T) =S$+C$+C$:NEXT 

199 DEFCHR$(33 ) =HEXCHR$( "3C7EFFFFFFFF7E3C092949090900999990929499900990999"):DEFC 
HR$(34 ) =S$+HEXCHR$( "FBFBFB99BFBFBF99" )+S$:DEFCHR$( 42 )=RIGHT$(CGPAT$(48),24):CLS 
119 DATA 2127399199D1161723231E26DSC5AF3299D9@112999CD62D9112899CD62D9112799CD62D 
9119199CD62D8C13A99D9FE92CA3DD91621FE93CA3BD9157A620323D11D99:CGEN 1 

129 DATA C29CD915C298D92199D1912739161793631E267EED7993231DC254D915C259D9C9B7EDS 
2CD71D91919CD71D9B7ED52C9ESCIED78FE21C281D93A99D63C3299D9C900 :RETURN 

139@ FOR I=9 TO 999:POKE &HE999+』、(PEEK@(12288+[ ) ) :NEXT : RETURN 

149 FOR I=@ TO 999:POKEQ 8192+1,39:POKEQ 12288+1,(PEEK(&HE999+1 ) ):NEXT:RETURN 


3 
 】 
し 3 
は 】 
2 
{ 交 計 
3 
人 は 3 
3 
> 285 
る 3 
} 人 8 
股 * 
克 
3 
: 
トミ 4 
人 は.】 
滴る 
に 
まえ 


は ご 7 おけ マヤ 


す 。 中 あや の パイ トル 作 選 
田 プロ プラム の 説明 
10 初期 設定 
20 ダイ トル 表示 
30 画面 作成 
40 キー 入力 、 表 示 処 理 
50 の ーー クエ ルリ リル 0 リ / 
60 マシ シン 計 き ーー ル ( ゆ 
イン プロ グラ 6) 
世代 表示 、 キ ー 人 入力 
/0 キー 入力 処理 
60 マシ ン 語 デー ツタ 読 み 
込み 
90-100 PCG 設 定 
IM0C2U、 シン 語 デ デーツ 
130~140 初期 画面 デー タ 読 み 
の サブ レイ 
画面 表示 サブ 
支 ワ ー ク エリ ア 
D090H フラグ 


D100H~ 画面 デー タ 格 納 


一 チェ エッ クボ イン ト 


マシ ン 語 デー タ ヤ が 短い の で 、 


チエ ッッ クサ ム を 休 げ て の ませ 6。 


間違え ず に 入力 し て ぐだ さい 。 

マシ ン 語 の メイ ンプ ログ ラム に 
な で の 0 の の げ 
だ の で 、 ち よ つ と 見 づら いで す 


ね 。 (リン ノ ) * ラ イフ ゲー ム ビ 


つい て は ポシェ エッ ト VQOI.2 な ど 


を 見 て ね 。 


を 『 に 6G 人 に 


空 / X 久 ン ン ン ン ン ン ンジ 


隠れ キャ ラ が すご い 本 格 派 ゲー ム 


FOR 5(Pro, k) Asic-c 


る 遊び 


いろ いろ 、 だ くき さん 、 わ お まけ つき の 
スン Np O の ら こ ーー チイ ング テグ ー ム 。 

3 種類 の 敵 が フワ フワ と 方 向 を 変え 
な が ら 攻 め て くる の を 、 右 に 左 に よ け 
な が ら 、 ビ ー ム て や っ つけ る と いう も 
の 7 だ けた 。 ます は 。 こ の の ゲー ム 6 
し て 興 稚 度 、 画 面 、 動 き と も バッ チリ 。 
お っ と 、 使 用 キー は 、 左 移動 が 」、 有 


CD 。 7 し 、 0 生ま て 。 

分 回 待 中 に な っ だ ら 、 6 文字 以内 で 
名 前 の 登録 が で きる 。 

を そし て …… う 一 ん 、 こ れ は 作者 の 希 
望 で 秘密 に し て お きだ いん だ けど 、 ヒ 
ンド だ りあ けり る こと に し よう 。 近 は 、 
この ゲー ム 、 自 機 が 1 吾 増え る スペ シ 
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男 変 数 リス ト H…… ホ ッ パ ー の ジャ ンプ カ  : 460-490 レー ダー 物 動 まだ きつ いと いう 人 は 、210 行 の 
X, Y……LUSTER の 座標 ・ N…… ホ ッ パ ー の X 方 向 の 速 さ : 500 輸送 船 和 動 YS= 以 下 を YS+ (YS> 一 
YS……LLUSTER の 上 下方 向 : J…… 山 の キャ ラク フタ 510 パー ド 、 ア ー ケ ロン : 6) *6 else YS=Y 

の 速度 O 〇 J……1 つ 山 の キ ャ ラフ ラフ キャ ラク 々 変化 S- (YS<6) *6 に され ば 
T……LUSTER の 滞空 時 間 タ 520 メイ ン ル ー チ ン 頭 へ : 上 下 の 動き が リアルタイム ハ に な 
G……LUSTER の 残り 数 M…… 山 の Y 座 標 530-570 各種 衝 突 処 理 る 。 そ れ で も や られ ちゃ うと い 
S…… ス コア 〇 $…… キ ャ ラク る 設定 用 580 スコ ア 表 示 う 人 は 、500 行 の if と than 
O…… ハ イス コア 還 プ ロ プ ラム の 説明 590 ゲー ム オ ー バ ー 判 断 : の 間 を (rnd (599) =1 
F…… ミ サイ ル 、LUSTER に : 10-- 80 初期 設定 、 キ ャ ラフ : 600-610 ラス ター 爆発 処理 :) and (status( 

当 た つ た スプ ライ ト 定義 620-650 背景 の 表示 1 ) の ) に すれ ば 、 輸 送 船 が 


だ ぐさ ん で る よう に な る か ら ラ 
スタ ダー を 増やし て 練習 し て ね 。 

ご の プロ グラ ム で は 、 バ パ バード 
ガ が エラー を 日 す の で OTR EE『PGT 
で 処理 し て いる ん だ 。 走ら せ て 
みて 右 は し を パー ドガ チラ チラ 
し だ らら 、 ど ご こ か で よ ラ ー が で て 
いる 証拠 な の で 、40 行 に ~!“ 
を つけ て Rem 文 に し て デパ バッグ 
を し て ぐら は い 。 (グー) 


Le02m 敵 の ボ ポイ ント 

C…… キ ャ ヤラ を 変え る の に 
使用 

K, し …… キ ー 入 力 に 使用 

Y1 …… バー ド の Y 座 標 

Y の …… ジ エッ ト の Y 座 標 

B…… ジ エッ ト の 動作 制御 用 

D…… ロ ツ カ ー の 動作 制御 用 

E…… ア ー ケ ロン の 動作 制御 用 

X2, Y3…… ホ ッ ツー の 座標 


150 一 170 初期 設定 670 の ロード デー 電 理 
190^210 キー バカ 56000 、 ダイ トル デモ 

220 ミサ イル 発 妹 6860-1050 キヤ ャ ラフ タデ ー タ 
230-250 ラス タ ヤー 表示 田 チ ェ ッ クボ イン ト 

260-260 バー ド 秘 動 まず ラス ター の 動 ガ し 亡 が む 
290-340 ジ エ ツ ト 移 動 ずい ね 。190 行 の う ケ 所 ある K ニ 
350-370 ロッ ツン 移動 の 石 辺 を りら 4 は らら に 、 ら ら 6 は 
360-400 アー ケロ ン 移 動 ら 4 に 変え れ ば 、 ラ スタ ヤー の を 
410-450 ホッ パー 秘 動 石 の 動き が 、 正 常に (や ) な る よ 。 


の @ @ @ @ @ @⑨ @ @ @ @ @ @ @ @ @ @ @ @⑥ @ @ @ @ @⑥ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @9 @ @ @9 @ @ @ @ @ 
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90-140 画面 作成 ・ 660 バー ド の エラ ー 娘 理 


ジ テット / 稼 でぶ 大 先生 は 、 原稿 を 書く と き 小 さ な 小 さ な ス テレ オ で し よっ つ ちゅ う テ ー プ を か け て いる 。 こ の まえ 、 全 部 の テー ブ を 聞い て クア 
素人 し まつ て 、 し か だ な ぐ SB -5520 を 聞い て 気 を まき ぎら わし て いた の だ 。 恋 の だめ 教え て お く と 、 こ れ は MZ-80B の BASIC。 


ング ググ ググ ク ば 9 ル @ 


いみ ょ ー じ ん 


BY だ 


… パ コ の X 座 標 


の 
「 く 
= 
Eo 
感 
に 


4 だ だ ひだ すら 上 へ 上 
ZS 『m あ が ーー る 。 


ウ 
くう 
3 
に 0 


/ 


1m あ ば ぼ < い / 
FOR ル MS(Pro, Jr 


G ハ 圧 中 人 桃 
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毅 D 氏 | 旗 こ 細い 1U 3 
甘 語 | K 総 人 也 RGV/ 迎 IN 
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Ia] こ F-O 計上 上 、 。 す ご S ムー 
トー ご ャ 7TT> ゃ ーー し 呈 二 1 1 | 
se 中 用 に P コ CT 上 ト キー 工 …、 ロー、 = 
で LLC OL %H ー、 ぃ FL ロー 0 ロニ 
rmaa aa aa CLLLCGE OTN CD LE k こ ム PCnOD 
x ら ゃ 「 こ OhOL 上 日 ー 届い ローmー の ロコ 本 と て ょ < 
か KKXKkOD G 妊 上 1 て 一 上 ロー ロー Um 
員 ゆ ーー OO やら ロー … ロ に | 
一 こと De こ OH と ロ ソー や ーー と にょ 中 ど だら GO で や ーー 
Osassrdss Q エ ロ に | と て ゆ 和 へ 還 ロ と 馬 や 品 
U 代 = て で OO て sm 上 へ 日 こ エ 呈 一 mm コー | ロ 避 
本 ・ OOCCssLL し と = ニー エエ CO に に と だ 訓 員 こつ コ 中 析 
st エ OO と ロロ CH 十 Cd 中 HH ss 
すす で - で GO ロー バ 1KDCKrCOO 避 ss ーー= ロ 
ぃ ーー = ec5hO つ ss 中 エ ンー へ で ーー ト つら 1ー・ ム 
m 品 性 > に CO ゆい に テ ヒー 民 と OO と mm に O 
HTー こ ーーG 目 = すす ニ ーー ココ ーー こら ロロ m エ と ひび つ p 
で MC In ロー ビービー rmkCdss nmー ーー ロ の こと と 「 ロ 
ae に Cd つい トー ュ ュ = Chr ロコ ロ m 避 コ = 中 
HID と QO ーー ン 四 nm re っ 0 OGs ら m へ AM 
inUCdm ー ト GO= に = ヘー ニー ニー、 と らら 旧 一 10O 一 
sda ロス へ ロロ ベト = 本 エエ ゆ O ロ エエ 二 こら の 中 
rd cr UID の ロー 貞 エロ ニーズ ロイ と mL し ニーロ ょ 
CTeelD こ OO ト こ ビー U へ 中 や cs し 申 = = の 
mm HHDTUCGHLLM コ コキ オロ ニニ ロラ ーーCLLL ほう つう 
! つ CO ss の OU に て てら シロー オニ = つ O0O て 
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= COGOHDCT ロロ = CC 0 = ュー ニー バト ルレ ーー バ の と 
= In OH U ト hG つの ロニ で ニュ ーー ーー に 字 上 mm 十 に に いい | 中 
志 に いこ cd erT こ コロ ペ ス へ ロロ ュー トーン ウロ へ ヒー へー ニー 
ここ COhOC す コー コ レー ゆす ロー へ ヒト DO ニニ ーー ロー 
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エーUDD トト ウー、 mrrt コ ロー ニー テ UI ーー チチ に ピコ ド ュー 
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な お 、 台 


O 


倍増 する は ず だ 
ラフ ンダ の 速 さ は /、 


さ を 
キヤ 


や 
て 


は White Ball 


行 


の moVve@ 命 人 琉 の to 〇 , 〇 の 


10 


ら 、 


ーw 


キ 


ん で Red Ball を むか え う と うと 


こつ コ 


つつ 


あこ | 


値 を 入 


れれ ば 変わ る 。 オリ ジ ナ ル だ と 


を つけ て 数 
ちよ つと 物足りな か つ だ この ゲ 


ーー: WW /4 
タ 


て 一 


縛 本 


に 9 00 し 用 ^ 
を 入れ る と ぐつ と 興奮 度 が 増す 


9 


N 


ーー の も 


ウデ う 


598883oao 


編 い 
の 


| } 々 


ン で くい レ っ ne6 節 下 


な 


で ) し 


+ ょ 2v さ 。 J6 う っ 


所 公 つ で 片 革 会 目 っ 
GSG レレ ^ へ ぐつ で せ E 届 准 や る の うつ 
区 ご 赴 皿 洋 医 じ " じゃ 答 杜 つじ っ 


は 8 EK 取  E 上 BB 」 


No JJ) 

で 付 回 

VPE へ 。 

つ 』 コ SG 

ね っ ら つ 6 

S や 店 征 で 

ね の ① 〇 デリ 

引 の 山 レレ 

中 人 GFK9 つ 

ヶ D 工 や 世 

羽 O 受 所 

16 レ 。 レノ 0 有 | 

。 りり 編 改心 

NN む NN っ デー 

うり 心 べ 旋 で む 仏 朋 1 

必 や 編 申 入 SN0G6G* 
2 お く 
い 半 と 
ws を 
と 9 で つ 
pe 伯 守 、 
2 人 く 
09 志 ンー 
%⑳) 室 つ 寂 
MS 
まこ 
ぐ 全 | や ー 
NN 
2 人 き 交 " 生 
全 の め ミヤ 各 | 
2 へ ふつ 鈴 ※ 
つ 溢 | 忌 軒 へ S 


ト 因 有 有 朋 肝 時 月 時  % 胃 】 
ペー 放 ン せ 乱 二 中 細 十 E 半 箇 十 怪 時 G 
栓 に 突 | (へ 
時 4 


Eu 


と を で 一 


い 


会 社 の キャ ラメ ル を 買 つ て き て 、 1 つぶ ずつ 、 か わり ば ん ご に 食べ る 。 も っ 3 


まで や つた だ 結果 、 全 部 引き 分 け に な つ だ けど ね 。 


と ー コ 


お いし い ロ シア ン ・ ル ー レ ツ ト の や り 廊 。 某 製菓 
デン 


ども 、 


〆 


に 
り 


計上 8 有朋 昌 k 8 っ 
フ 


表 何 ! 


4 


い 


4^ 今 は 必殺 シラ ンプ リ 。 右 上 の ほう で 
黒く な つて いる の が キミ 。 見 えな いね 。 


ペク 手 び 万 

画面 を 見 れい ば わか る と お り 、 こ こ は 
な ぜ か ソー ダ 7K の な か 。 お お むね 、 メ 
ロン ソー ダ で は な いか と 思わ れ ま す 。 

ソー ダ 水 の 底 の ほう で は 、 プ ブクブク 
プク と 泡 が 出 て いる けれ ど 、 キ ミ の 使 
命 は この 泡 を 取っ て スタ ー ト (矢印 ) 
の と ころ まで 運ぶ こと だ 。 

移動 は カー ソル ・ キ ー、 泡 の と ころ 
まで きた だ たら ス ペー ス ・ キ ー を 押し て 光 
を キャ ッ チ 。 キ ャ ラク タ が 、 人 の 形 か 
ら 、 ピ ンク 色 の 玉 に 変わ っ ちゃ う 。 

と ころ が , この ソー ダ 水 の な が か に は 
監視 人 ( 十 ) が いて 、 泡 を 持っ て いく や 


見 計上 見 和 見 | 


| 
| 
U 


| 時 | 
「: 

ッ と 総 Py Z 忘 M 
WW と ち 対 真 受 3 太 | れ Z 
ks の 0 電 生 7 、 | 
iz 序 く 生生 府 921 
みく ん ま の 呈 56 

1 生ま 
な み は  。 快 近 そい か 
m 生 いし 』 も る 出 
sm に の く 使 人 て 

し に な い が 
たい や 多 も 
W : 家 て 還 すい う 
5 に す qs い よ M 
ll > 帰 マ う 
1 | 
1 し を な が '0 
L る ン 
い 7 


IL OL LOLLL LTL L っ 


ソー ダ 水 の な か の 不思議 な 小宇宙 


時 間 が 3 分 も を こえ て も 1 


| 1 MI 上 上 有朋 MM 有明 MM 有明 上 邊 2 


見 つか つ だ / クル ク 
ルツ と キャ ヤラ が 回 転 
レ て 1 回 アウ ト 。 


つが 見 の りう と うろ 5 う 
ろ し て いる 。 こ の 監視 人 
と 、X 座 標 か Y 座 標 が 同 
紀 が か ら て も まう たと 、 見 
So て グ  Pe お > 


回 アウ ト 。 5 回 アウ ト で 
2 トー ポーク ーー だ 。 

監 相 人 に 見 つか り そ う に な っ た と き 
の 必殺 「 シ ラン プリ 」 を 教え よう 。 技 
と いっ ら て も 、 た だ 止ま る だ は 。 北 ま る 
と 、 自 分 の キャ ラク タ が 黒 に 変わ り 、 
監視 人 に は 見 えがく な っ て し まう の が だ 。 

点数 は 、 1 歩 歩く た びに 1 点 増 え 、 
泡 を 取る と 10 点 X 面 数 、 泡 を 矢印 まで 
持っ て い 〈 と 50 点 X 面 数 。 ポ イン ト が 
全部 泡 で 埋まる と 1 面 ク リア だ 。 2 面 


陣 POITHT: 


目 か ら は 監視 人 が 1 人 ずつ 増え て 、 飛 
躍 的 に ムズ く な っ て いく 〈 ぞ 。 

ボー ナス 点 が 面 ク リア 時 に 入る 。 こ 
れ は キー を 押す タイ ミン グ で 点数 が 倍 
加わら て で 《〈 る と いう ニーク 方 式 だ 。 
較 参 孝一 「 マ イコ ン BASIC マ が ガ ジ 
ン 」 83・11、『HELILANDER」 


ャ 示 さ は じ め る と 白く 浮か びあ が る 。 
ほら ほら 、 監 視 人 に 気 を つけ て / 


ソー ダ 水 の あわ ガザ プ ラス いつ ば ぱい に な つて か ガ ら (分 ご らい) やり は じ め だ ほう が 楽 み たい 。 監視 の 目 を 盗め で あわ を こる ス 


リル が だ たまらない 、 う ん ……。 ソ ー ダ の あわ を ゲー ム に し ちゃ うな ん て 一 一 夢 が ある な ぁ …。 個 人 的 に 好き な ゲー ム で す 。 


江 テ っ トー 
家人 9 


19 COLOR2,9:CLS :LOCRTE5,13 :PRINT"SODR B 


0Y COPYRIGHT (C) 1984" :PAUSE19 :LOCRTE 

2, 23 :PRINT"MHEN YOU PHSH RNY KEY, GRIE 
STRRT" 

29 IF INKEY$(9)="" THEN 29 

39 “セッ テ イ 1 


9 UEF NIR ユー イ 3UINKA2ES)。T2t ヨ JJTUUL1SJ) 
$( 3) : ヌ = :B$=" 「" 

っ 9 FORI=gT015:RERDHUC 1 ) :NEXT 

69 X$(9〕)=" 介 "FOURT=1T03:X$(1)= モ リリ "iNEXT 

29 [RTR 59.4 り , フロ , 39。4 り 9, フ 9,9,8, ノ ,6。6, フ ,8, 
9, 59, 39 

89 ^ や ゅ テイ 2 

9 り 朋 $=CHR$( 99) : 人 = :S= り 

199 IF S> THEN =S 

119 COLOR2, 9 :CLS :GOTO989 

129 FORI=9gTOI1:X2(T)=(RND( 1)* ネ 13)+8:Y2( 1 )= 
(RND( 1)*13〕)+8 :NEXT 

3 イリ > 2 スタ - ド 

149 LOUCRTE19,15:COLUR フ , 1 
+ 1 j「 画 エス 9 因 " 

159 PLRT2」"E1+RCRGRER+CRGRERRRF 1 RT#tCR#GR 
ER+#CR#GRERRRE 1R+CRGRER+CRGRERRRE 1 #FF#GG 
Jalak:1515 セ は 0 

169 LOCRTE19,15:PRINT" 3 相 。 
[=gTOF1:LOUCRTEX2( T エ )」Y2( エ ) EPRTNT リ + す "ENEXT 
129 P=g:H=16 :F= ニ 9 :X=22 :T=6 : 日 =9 : り = フ :T THE ま = 
"99 : り 9 :99" 

誠 電 オリ ルト ブ プ (し キ こ リッ アウ タイ る 0 うり) 

139 「$=[IID$(TIFHE ま 5 1 ) : 和 T$=RTIGHT ま (TIHE$*, 2 
0 

2Z9 り 9 COLOR2,9:LOCRTE35,13:PRINTIH$ "回 " 
219 IF TIHE$>= "9:93 : り 9 "GO0SUB88g 

Z2 り K ま =INKET$(9) :K=RSC(K$ ) :UNK-22G0SHUB36 
り , 389, 499, 429 

23 り BKE3132。NEI 人 UTEALLC3199) 5H=UHT1 
15THENLU= ぼ 

24 り 9 IFK=32 RND F=9 RND PEEK(532489+4g*(Y 
+1J+%)= フ 1 THEN .F=]1 :GO0SHUB66B 
2Z5 り 9 IF X=22 RND Y=6 槍 ND F=1 
269 C=RND( 1)*H:D=(RND( 1 )*3)+ 1 
N | GOSUB 229, フ 45,2 フ 26, 28P 
2Z2g 得 =(RND( 1)*※12)+9:B=(RND( 1)*15)+6 
289 FORI=gTOI1 

239 IF =X2( 1 ) GOT033g 

399 NEXT 


:PRINT" 環 ロコ ジロ 引け 


)「$) 


: IFU2 


GUSUB639 
:CULOR2,1 1:0 


319 IF =X GOUTO033g 
32 り し UNSOLE B。22-B, 有 1 :COLUR5。 1 LOCRTE 失 , 
21:PRKINTX$CRNDC1)*3) j:LOCRTER,21 :PRTINTCH 


R$(15) 
33g 
349 
3 


:COUNSOLE 

COLOR9」1 iLOCRTEX,」 YE:PRINTR ま ) 

UTU1 コ 9 

2055 が IP 及 

369 IFPEEK(532489+49 ネ Y イ +(X+1 ) ) <> BRETURN 
32 り 9 COLORU,」 1 :%= ミ XX+1:LOCRTEX」YT:PRINTR$ ):LO 
LRTE※-1,YT:PRINTB$ ) :GDTD45g 

36 り 9 IFPEEK(532489+4 ロ T+(X-1 ))<>BRETHURN 
339 CULORU, 1 :X=%-1:LOCRTEX,Y:PRINTR ま $):LO 
CRTEX+1,T:PRINTB$ ):GOT0459 

499 IFPEEK(S32489+4g*※(Y-1)+X) く > BRETHURN 
419 COULOURU, 1 : イ = ミ Y イ -ー1:LUCRTEX,Y:PRINTR$ j:LD 
CRTEX」 イ +1 iPRINTB$ ) GO0T0458g 

42 り 9 IFPEEK(532489+4g* ネ (YT+1)+〆) く <> BRE TURN 


43 り 9 COULORU, 1 :T=Y+1 :LOUCRTEX,Y:PRINTR$ LO 
CRTEX,Y-1 :PRINTB$ ) :GOT045g 
人 の 、 0 の (お 33] 


459 FORM=gTO[ 
469 IF Y=Y2(M) GOT05g9 


し まつ だ 。 こ れ で 心 も つ な が つて いた ら 


429 IF =X2(MM) GOTO0S59g 

489 NEXT: と 

43 り “ ミ 

J り 9 CRLL(3136) :FORI=gT02 :PRUSE3 

っ 19 FORJ=gTOI1 iCOLOR2」1 :LOCRTEX2(J) ,Y2(J) 
FPRINT"+ す "ENEXT :PRUSE 1 :PLRY"+B" 

っ 2Zg FURJ=gTOI1 :CULOR フ , 1 
:PRINT"+ "jiNEXT :PRUSE 1 
う 3 り NEXT 

っ 49 COLOR2」1:FORT=1TO59 :POKE3192, 1 :CRLL( 
3199) :NEXT :CRLL(C3136) 

559 FOR1I=gT02 :FURJ=93T0192:LUCRTEX, Y :PR 1 
NTCHR$(J〕)j:PLRYTTC9TD" :NEXT ENEXT 

S59 LOCRTEX,Y:PRINT "ネリ j:PLRY" リ +CBRGFEDC-B 
… 村 ー ロ ー ド コー ヒー リーCZRKBY 

9 グロ ョ FT1 SEOLUDRZ プ DILOC 有 TE36。 135PRINTPYS1 
FP=SGUT0329 

うっ 89 COLORS, 1 :IFF=1THENLOCRTEX,Y:PRTINT" 旬 " 
: 則 ま =CHR$( 33) :GUTO6g9 

239 LOCRTEX,Y:PRINTB ま : 

99 X=22:Y=6 :F = : り =2 フ :COULORB :LOCRTEX, Y :PR 
[NTR$: 

519 GOTO138 

5629 “ね イフ ト 1 (KS ま * イ フト 〕 

639 COLOR6.5 :LOCRTEH, 1 :PRINT "回 "「F ミ ロ : り = フ : 
生ま =CHR$(33) :H=H+ 1 :S=S+ (5g*1) :PLRT"CF -D-G 
-F+[D+F-GFDU+D+F+B2Rg" : IFH=31GUTOD81 ぼ 5 

649 GOUTO689 


659 ホイ フト 2 (人 19 8 イスト) 

669 COLOUR,1 1PLRT"CDF GBR=F+RGDT ロ C+F " :5S=5 
+ (19):LOCRTEX」 イ +1 iPRINT TU り =3 : 朋 ま モ "本 
0629 ペル アモ ョ タン が 


689 COLOR2, 9 :S=S+1 :S$=STR$(S) :LOCRTE34, 1 

9 :PRINTRIGHT$( "9999"+HID$(S$,2,LEN(S$)- 1 
) , 5) :PLRY2, "Cg" 

699 IF S>& THENLOCRTE34, フ :PRINTRIGHT$( "9 

999"+HID$(S$,2,LEN(S$)-1 ),5) 

299 RETURN 

219 カフ リィ イト ドウ 

229 IFPEEK(532489+49*Y2(C)+(CX2(C)+2) ) <> 9 
DR PEEK(532489+4g*Y2(C)+(X2(C)+1)〕<>9 R 

ETURN ' 

239 %2(C)=X2(C)+2:LOCRTEX2(C),Y2(C) :PRIN 
T"+" jiLOCRTEX2(C)-2,Y2(C〕 :PRINT" "iRETU 

RN 

249 IFPEEK(532489+4g*Y2(C)+(X2(C)-1)) く >9 
RETURN 


/39 2(CJ=X2(C)=-1 LOCATEX2(C) , イ 2(E) 5PRIN 


1 まじ DBITEK2U じ JY ト )Y2UC) PRTNTT ")2RETL! 
RN 

269 IFPEEK(532489+49* ネ (Y2(C)+1)+X2(C)) く >B 
RETHRN 

グン 12( じ モイ 2( し じゃ 17L0CNTEX2CEJ)。 Y2(C ) PRIN 
1 の すう SLMENIEX2UO6 1 Y2CC)ーTSPRUNT" すう REY 
RN 


Z89 IFPEEK(532489+4g*(Y2(C)-2)+X2(C)) く > 
DUR PEEK(S532489+49(T2(C)-1)+X2(C)〕) く > R 
ETHRN 

9 TO =Y2( じ ニー ラ 21 し OCRTER2CCJ。YT2(CJ PRINR 


まま に に 人 お EX みて し))TZ2( し )92 PRINTY "うす RETL 
RN 
899 “ラウ リト クリア & お " - ナ る 


819 PLRY'"D3DB3ROB5SB3RRGFD5-BRCR2C3C-BCED 
8R9D5G6RgG5RgG5F 6RgF 3D フ RSE3#DE5G3BA5RORR 
5R3B+C2R9+C3+CAOR9R3Rg フ R5B5AGF フ RF5GGS 
Rg" 

829 COLOR9g, フ 2:LOCRTE9, 15 :PRINT"B 坦 0DNUS 思 " j 


* 
% 


ゆみ と よー ご こ は 昭 和 39 年 8 月 14 日 生ま れ 。 咽 液 型 ん 型 。 な ん と か ば ん も 手帳 も 別々 に 買 つ た の に 、 色 違い の お そろ い を 買っ て 
- オ エー きも ち わ る いよ お 一 ん 。 


:LOCATEX2(J),Y2(J) 


クン クン ン ンク OO グ グル @ 


ぃ ervrv は MI へ / ニ 潤 堂 す じ MIN ロ N 選 惹き ツキ 


【4 
トコ 
移 


ソー ダボ ー イ の 続き 


83g E=5g9:LOCRTE 16,15:PRINT"*※ 599 ":IF1 
NKEY$ く > "GOT0869 

84g E=1gg9:LUCRTE 16,15:PRINT"* 1g98":IF 
INKEY$ く > " "GO0T0869 

859 GOT083g 1148 
869 PLRAY"-C1D-CD-CD+G+B6R9" :S=S+(H*E) :GO ア 
TO189 115@g 
82g 27Z オ - ロ " ー 

889 P=P+1 :COLDR2,9:LOCRTE36, 13 :PRINTP: 1169 
899 FORI=9T02 :PLRY"-E3R9-E3Rg-E3Rg-C6" :N ・ 
EXT :PLAY"+B9Rg" :TITE$="g9:g9:99":IFP=5GO 112g 
T0929 で 
3899 RETURN 1189 
1 70c6 る オ -Y7 | 人 
929 COLOR2, 1 :FORI=1T03 :FOURJ=gT029 :POKE31 1139 
92, J :CRLL(3199) :NEXT :LOCATE11,15:PRINTLE LM 
FT$("GRFHE OUER" 1) :NEXT :CRLL(3136) 12g9 
339 FORI=1T015 :FURJ=gT029 :POKE3132, J :CRL 池 ー 
L(31p9) :NEXT :LOCRTE8,12:PRINTLEFT ま ("TRY 1218 
GRIN 〔YZN〕) "1)j:NEXT :CRLL(3136] ア " 
949 IF S>g THEN を =S 1229 
959 D$=INKEY$(1) :IFD$="N"THENENDELSEIFD$ 1239 LOCRTE フ , 22 :PR 1NT 
="Y"GDT03g 1249 LOCRTE1,11:PRINT "XPUSH" :LOCRTE26, 1 1 
369 GOT0359 :PRINT "HOUE 回 還 男 回 回 回 " : 朋 $ 

929 09 1259 COLORB, フ :LOCRTE1j14 :PRINT "SPACE" :LO 
989 COLOR2,9:FORT=gT024 :LOCRTE32, 1 :PRINT CRTE28,13:PRINT "和田 還 回 回 + 回 ふ " 

0 NE2T 1269 COLOR6,g:LOCRTE19, 1 :PRINT "POINT :Ern 
399 COLOR2 :LOCRTE33, 9 :PRINT" 内 rrrrrrrrrJ: 

1999 COLOR5 :LOCRTE33, 1 :PRINT "ソー グ " - 回 回 回 E 隊 1229 FORI=gTOD5 STEP2:COLOR3,5 :LODCRTE8, 1 : 
"ウイ 回" PRINT" 還 軒 ':NEXT 

TO EOLOR2 LOCERTES3.33PRINTDT で で ビデ ンド 5 1289 COLOR9,6:LOCRTE23,6 :PRINT "<" 

1929 COLOR6 :LOCRTE34,5 :PRINT "HI 回 還 SCORE " 1239 FORJ=2TD1STEP-1 :COLOR2, J 

1939 COLOR5S :LOCRTE34,9:PRINT "SCORE" 1399 FORI=6T0O14 :LOCRTE8, 1 :PRINT" 

1949 COLOR3 :LOCRTE34,12:PRINT"TISS 回 還 " "iNEXT 

1959 COLOR6 :LOCRTE34,15 :PRINT "ROUND" LOCRTE2,15 :PRINT" 昌 

1969 COLOR4 :LOCRTE34,18 :PRINT "TIIE 還 IE LOCRTE6, 16 :PRINT " 昌 

1929 COLOR2:LOCRTE33,21 :PRINT "PRDGRRITIE 
還 BY 還 回 加 29311" 

1989 S$=STR$(S) :LOCRTE34,1g:PRINTRIGHT$( 


1129 
| 名 
1139 


EERTEBS、 OSPRINT 二 NLATK、 エーーー 首 

FOURI=6T093 :LUCRTE6, 1 :PRINT " 国 主 
圧計 :NEXT 

LUCRTE6,19:PRINT | 証 

FORI=IIiOD14 :LUCRTE フ , 1 :PRINT" 男 
較 :NEXT 

紀 拓 選 稚 上 だ お 15 :PRINT "名 

LOUCRTE5,16 :PRINT" 族 

LOUCRTE5, 12:PRINT " 圧 

LUCRTE5, 18:PRINT "時 

LOCRTE5, 19:PRINT 


LUOCRTE6,29 :PRKINT 4 


LUCRTE フ 21 :PRINT 2 


1319 
132 り 
人 

3 は 3 も UCRTEB。 123PRYNT" 


LUCRTE6,18:PRINT" 


134g 
"gg99"+HHID$ ま (S$,2 LEN(S ま 〕)-1) っ ) 


1358 
4 

1369 
1 3〆M 
1 38 
133pg 


1999 HS$=STR$(g〕) :LUCRTE34,2 フ EPRKTINTRIGHT$【 LUCRTE6,13:PRINT" 倫 
"989"+I1ID$(HS$,2,LEN(HS$)-1 ))5) 

1199 H=+1 :H$=STR$(H) :LOCRTE32,16:PRINTR 
【GHT$( "9"+HID ま (FT ま ,2 LEN(H$)-1)」2) 

1119 LOCRTE4,4 :PRINT 坦 葵 、 


2 人 


LOCRTE2 フ 2,29:PRINT "内 
LOUCRTE8」21:PRINT 人文 
NEXT 
COLOR,g:GOUTO129 


HN 半 NINE ロ N JH 光 。 さ 2J 修 


の 
し コ 


*l 缶 ロ omND 移 一 


還 変 数 リス ト ・ 80-120 初期 設定 2 ・ 670-700 スコ ア 、 ハ イス コア ・ < だ さい 。 
A$……BOY の キャ ラク  : 130-170 ゲー ム 開 始 の 設定 ・ 表示 ・ 96 行 の 最後 に : フ お ゃ =CH 
B$……'BOY の キャ ラク フタ 満 去 ・ 180-210 マイム 表示 ・ 710-790 監視 移動 ・ R$(99) を 追加 。1 69, 5 
MU( )…… サ ウン ド ・ 220 キー 入力 ・ 800-900 面 フ リア 、 ボ ー ナ ス : 1 の 9, 529, フ 39, フ 5 の 
M…… 面 数 ・ 230 BGM ・ 910-960 ゲー ム オ ー バ ー 処 理 ・ , ノノ の , 9 の の 各行 の : P 
S…… ス コア ・ 240 あわ を と つ だ た か  : 980-1390 画面 設定 ・ RINT\ 二 を : COLOR4 
P…… ミ ス の 回 数 ・ 250 矢印 に 到着 し た か や ・ 一 チエ ッ フ ポイ ント ・ : PR INTZ$ に 追加 、 変 更 
X……BOY の X 座 表 ・ 260 監視 の 種類 と 万 向 の ・ 今回 、MZ 系 は 力作 ぞろい で : し て みて くだ さい 。 
Y……BOY の Y 座 表 ・ 決定 ・ 選考 に 苦労 し て 、 担 当 の 私 と し ・ 監視 が 緑 の 人 間 と な つて 表示 
A…… あ わ の 位置 ・ 270-340 あわ の 秘 動 、 判 断 ・ て は 、 う れ し い 悲鳴 を あげ て し : され ます 。 な お 、COLOR4 
X2( )…… 監 視 の X 座 標 ・ 350-430 BOY 物 動 ・ まい まし だ た 。 ・ は BOY と 区 別 す る だ め に 色 を 
Y2( )…… 監 視 の Y 座 標 ・ 440480 監視 に 発見 され だ か : と ころ で 、 こ の ゲー ム に つい : つけ だ だ け で すか ら 、 け ずつ て 
E…… ボ ー ナ ス ・ の 判断 ・ て で す が 、 監 視 ひ の キヤ ラフ タ が ・ も けつ こう で す 。 
V……BOY の 色 ・ 490-610 監視 に 発見 され た と : 貧弱 だ と いう 指摘 が 編集 部 内 よ : (エイ キチ ) 

田 プ ロブ ラム の 説明 ・ き の 娘 理 ・ りお こり まし た 。 だ し か に 監視 ・ 

10- 20 デモ ・ 620 一 640 ポイ ント 1 ・ も 人 間 で す 。 あ まり に ガ かわ いそ : 

30- 70 初期 設定 1 ・ 650-660 ポイ ント 2 ・ うな の で 、 炊 の よう に 変更 し て ・ 


お ミエ ッ ト 和夫 よこ は 23 時 20 分 に 会 社 を 出 な いと 終電 に 乗れ ませ ん 。 だ か ら 毎 日 30 分 前 に な る と 、 だ まつ た 仕事 を ひか か えて うろ うろ し ます 。 
そし て 必ず ゆみ に 「 ね エ 、 い つ し よ に 泊まろ う よ お 」 と 鬼 の よう な こと を 言う の で す 。 悪友 は つこ くる も の じゃ な い / 


ンス ター か わし て 彼女 の も と へ 


mmm 16 | 遊び 万 


CTTTrYrTTD rrrrr 四 
ん Ma 9 2 で 際 だ 示 き ポポ 避 あん の あい て ろ オ ンド 


し 9 ル 。 2 は な い 。 
キミ の 人 彼女 が 興 深 い 秘密 の 部 屋 に 閉じ 
こめ ら 牙 て いる の だ "HLEP/ 人 い う 
彼女 の 声 を 頼り に キミ ( 信 ) は ビル の 


、 た ぃ NN ss sss 突然 、 華 に 3 - 

^ ゲ ー ム 、 ス ター ト | 彼女 の 助け を プク ーー ンク と) で 。 ふう りゃ やつ! と 飛び あがり 、1 階 上 
呼ぶ 声 が 聞こ える (よう な 気 が す る だ Y の 儲 物 が 飛び 出し て きた . へ 。 あ つ 、 カ ギ を 1 個 守 れ て る !| 
け )。 右 上 に いる の が モン スタ ー。 カー シル ィ キー て だ 右 に 刺 き 、 ス ペ 

ー ス ・ キ ー で ジャ ンプ (まだ は カー ソ を うろ つい て いる モン スタ ー は ワー 
し し し し し し し し し し し し 2 2 で 左右 の 壁 か らい き な り 現れ る の て 年 
9 ょ な 顔 目 も 2 8 
6 < 3 指 う 本 - て 最上 階 ま で 行っ て くれ 。 天 井 に ぶ 人 人 の が か まっ つう たら り ゲーム オー パー。 
1 5 す A PP @ 
5 う か ャ ン > て - を 18 個 全部 取る と 、 Trrrrrrrrrrrrrrrrrrrrrrrrrn に 
メ を で Y て く < 計ら 0 い まま も も ま まま まま も も も まま も も まま まま 
mm ラ 当 す リ 思 れ m 也 上 階 に 秘 常 の 部 太 座 識 NI 
1 条 も 1 すず と へ の 入 日 が で き 、 当 ee 還 8 Ni 

\ 0 / ゝ へ 8 
る ょ よ "を る 尾 よく 彼女 の も と へ Q 
WE た いる と っ ぁ * 較 ポー 〇 
5 ん いで て - て) リ 8 が つなご た か て 泌 
し で 釘 証人 きる 。 に こい で 1 面 ク KS 
日 N ヽ っ 
6 レー 全て 1 だ 。 ルル の が お ヾ 
5 ね いわ に うさ 
な かい ま た た す ーー ア + 3 し 6 は て 1 Pi 
/ 。 1 オー リン ザッ < セ IT] [TITTTTIETH EEEEEETI OH [ NN 
ク 常 と * サ 三 | (英語 で "「 開 四 較 識 HH N 
し 。 “ の 通 て - け 、 ゴ マ ! ) rrrrrrrrrrrrrrrrrrrrrrrrrri] SN 
ト II BI 8 BI BI I I II 』 HI MI 』 I MI 1! 』 っ b 
N 

還 変 数 リス ト ・X1…… モ ンス ター の 旧 X 座 標 ・ 280-370 自分 移動 、 判 断 "・ RND(1) w*5>R-1 B 
V……V-RAM 先 頭 番地 ・Y1…… モ ンス ター の 旧 Y 座 標 : 380-450 モン スタ ー 移 動 、 判 ・ INT (RND*8) * づ 十 
2 KK キー 入力 : ・ 1 を 消去 し て ぐだ さい 。 ま だ 、 
H…… ハ イス コア ・ W…… 自 分 の 残り 数 ・ 460-510 ミス 時 の 処理 ・ モン スタ ヤー が 、 速 すぎ る と 思う 
R…… ラ ウン ド ・ で お …… 自 分 の 座標 こす る キヤ ・ 520-550 ゲー ム オ ー バ ー 処 理 ・ 人 は 、390 行 の : A ニ A 十 A2 を 
X…… 自 分 の X 座 標 ウタ タ ・ 560-640 ラウ ンド クリ ア 処 理 : : A=A 寺 A2w RND (1) 
Y…… 自 分 の Y 礎 標 ・ 還 プロ プラム の 説明 ・ 650-880 タイ トル 表示 ・ に 変更 し て みて くだ さい 。 
A…… モ ンス ター の XX 座標 ・ 20- 40 初期 設定 1 ・ 較 チ エッ フ ボ ポイ ント ・ 追伸 。 さ ら に 遅 こ し た い 人 は 、 
B…… モ ンス ター の Y 座 標 ”"・ 60-150 画面 設定 ・ 面 を フリ ア す る ご と に モン ス ・ : AA 寺 A2w RND (1) 
A の …… モ ンス ターX 方 向 増分 ・ 160-200 初期 設定 2 ・ ター が ガ 自 分 に せま つて きま す 。 : * RND (1 ) に し て くだ さい 。 
Y2…… モ ンス ター ヤ 方 向 増分 ・ 210-230 得点 等 の 表示 ・ ご の ゲー ム が 、 か ん だ ん だ と ・ (エイ キチ ) 
〇 …… 取 つ だ 鍵 の 数 ・ 240-270 ゲー ム ス タ マー ト ・ いう 、 元気 な 人 は 、410 行 の IF : 


テッ 今 お ふろ に 入 つ て いる か ら 、 あ と 5 分 こら いし だ ら ま だ か け て くだ さい .。 宮 後 君 宅 に 返事 の 催促 で TEL し だ と きのこ と で エク 
提 面 者 ある 。 と ころ が 、 そ の 後 何 度 電話 し て も うつ ろ に 呼び 出し 音 が 響く ば か り 、 背 スジ に 冷 だ な いも の を 感じ だ 私 で し た (つづ く ) 
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/ 素 水 氷水 氷水 氷水 炒 炒 氷水 氷 氷 素 水 氷 氷 氷 素 水 氷 氷 氷 水 氷 氷 
^ 涼 玉水 ONSTER BUILDING 水玉 水 
氷水 氷水 水 水 水 水 水 水 水 水 水 水 水 水 水 氷 氷水 氷 水 氷水 水 水 水 氷 
。 玉水 氷 BT Y.FHITYRUSHIRO 氷水 玉 
/ 水 氷水 米 玉水 氷水 氷 氷 氷 炒 炒 米 水 氷 炒 炒 氷 氷水 炒 炒 炒 ホ 氷 


QGQGGSGSQSG 
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2 り ^ 氷 氷 氷 リョ キ セッ ゅ テイ 1] ポ 水 水 

39 DEF INT 朋 -\※: り =532489 : り 1 =55296 9 : 昌 $=" 回 回 還 
周回 回 団 回 回 回 回 回 回" SPEED 9:PLRT ノ 

4 り 9 5S= り の : 届 =3 :R=1 :GOSUB 669 

5 ^ 玉水 氷 用" メ ブ ブーツ クト 炒 

59 INIT "CRT:":CLS:FOR I=g TO 24 STEP 3 
29 COLOR 1:LOCRTE 9,I:PRINT STRING$(25,『 
ロロ Ji:NEX[ ] 

89 FOR 1=9 TO 24 STEP 24:LOCRTE 1,24 :PR1 
NT_ STRING$(25," 加 還 ET)j:NEXT 1 


_ 9 LOCRTE 22,24 :PRINT STRING ま (25, "回国 困 ") 


199 LOCRTE 25,9:PRINT " ロ EG ) LOCRTE 25, 2 
4:PRINT "EE 
119 COLDR 3:LOCRTE 26.23:PRINT "回 ):COLO 
R 2 フ :LOCRTE 26,21 :PRINT "9 団 回 P 男 団 L 団 回 E 団 回 H" 
129 COLOR 5:FOR 1=3 TO 21 STEP 3:FOR J=g 
の 
139 \=INT(CRNDX フ + ォ J※ ネ フォ 2) : IF SCRN$[ メ ー|」 1)3J 
= "ERND SCRN$( メ , エ +1,1)=" "| THEN LOCRT 
EE だ 13PRINfE の うう も LSE 139 
149 =INT(RNDK2B+2) :IF SCRN$( ミ メー1 , 革 +1 3)= 
_ " RND SCRN$ ま (1 1)= 貼 ) THEN LOCRTE を 
>: さま 1 ま PRINT そま "ELSE 4 
159 NEXT J,] :Q=g 
1 ^ 水 氷 リョ キ セッ テイ 2 水 水 氷 
1 フ 2 X=1 :T=23 : 朋 =22 :B=1 : 有 2 テー1 1:5$=" "5BOSL 
B 189:GOTO 259 
189 \$= リ "回国 国 回 回 回 回 回 回 団 回 回 回 :X ま モリ 米 炒 米 米 米 林 水 氷水 氷 炒 炒 " 
199 COLOR 4,9:COUNSOLE 9,25,28,12:PRINT % 
ま +\$+" 氷 FIUNSTER - リキ る $+ す " 氷 BHTILDTING 炒り 二 ぎ まま 
+W$ 
29 り CDULOR 6,2:LOUCRTE 39,22:PRINT 「 画 BYT 邊 T 
" 
21 り ^ ネ ※ 炒 氷 トク テリ ナ ト " ノ ヒョウ フ " SLHB ポ 氷 米 
22g IF H<S THEN H=S 
23g COEOR フ 、95LUCRTE 28,Z)PRINTUSING “HH 
- SC : 村 壮 相手 二 日 ま + す "SCOURE : 提 本村 提 仁 リキ 日 ま +"KET 
寺 寺 " 十 日 ま + す "ROUND | 半 村 "キロ まま +THRN 本 "日 
5321-Qj 尽 53) 5)1NIT "CRT: "5RETURN 
24 ^ *※ 氷 氷 けり"- の と スグ -ー ト 0 玉 氷 
259 LOCRTE X」T:iCOLOR 6:PRINT "偽り: 
2 行 9 PLRT “CC3EGCEBCEG 
ジノ 9 LOUCRTE X,T2PRIJNRT " すう 
28g ^ *※※ 玉 が" フフ ラニ ウ ]" 用 2 水 氷 
299 Xi=X:YT1=Y:K=RSC( INKEY$(9) ) 
3g9 IF K>22 RND K<39 THEN POKE &HC2C,156 
・19:CRLL &HC2S 
31 り FE=U+X+TXX4 り :1F X>=25 THEN 5Z9 
329 X=X+{K=29 RND PEEK(E-1)<>24)-〔K=28 Rf 
NH PEEKCE キ 1 うく 《 く 22411BEEP pg 
33 り 上 =U+X+T ポ 49:IF (K=32 OUR K=39) FNUD Y2= 
< り ウ RND PEEK(E-49) く <>24 THEN Y2=-1 ELSE IF 
PEEK(E+49)=24 THEN Y2=9 ELSE T2=1 
349 Y=T+Y2:POKE U+TX1+T149, ワ gi:( ま =SCRN$(X, 
本 二 寺 
359 POKE U1+X+Y 炒 4 ,96 :PUKE り +X+T ポ 49,65 
369 UN INSTR( "IT "CC$) GOUTU 429,429,339 
329 S=S+1g:Q=Q+1 :PLRT "EEPBG+C+TCGP :GUSHB 2 
29:IF Q>=21 THEN LOCRTE 24,1:PRINT " 還 軸 


3 
38 り ^ ネネ 氷 モエ ブス グー ヲ ウ ]" 才 2 水素 本 
339 FOR 1I=9 TO 1:R1=R:B1 =B : 朋 = 朋 + 有 月 2 
499 FOKE &HC2C,」9, エネ 2 フフ:CRLL &HC2S 
419 IF =g OUR =23 THEN R2=- 介 2 : 人 =R+R2:1F 
RND( 1 )*5>R- 1 B=INT(CRND*X8)*3+1 ELSE IF P 
EEK(U+X+T※49+49)=24 THEN B=T-1 ELSE 1F P 
EEK(U+X+YT※49-49)=24 THEN B=Y ELSE B=INT〔 
RND*8 )3+ 1 


テッ 


429 COLOR 5:LOCRTE 1,B1 :PRINT S$+ "回 還 加 


439 S$=SCRN$(R,B,2) 

449 COLOR 4 :LOCRTE RRB:PRINT "eeR 商 1 四 " 

45 IF PEEK(U+X+Y*X49)=65 THEN NEXTI:GOTO 
29 り 9 

46g ^ *※ 玉 ヤラ レク - 9 ネネ 

42 員 =M-1 :GUSHB 229 

489 COLOR 4 :LOCRTE R,B:PRINT "6 還 回 回 画伯" ) 
49』 FOR 1I=g TO 2S5:POKE &HC2C, 255」 】 ECRLL 
&HC25 :POKE _&HC2C, 1 :CRLL &HC25 :NEXT 

599 PLRY "R2+B4+G+EB+B2B+BB+BSR ノ " 

519 1F 9 THEN COLOR 5S:LOCPTE 有朋,B:FRINT 
5S$) "回 還 加 "jj):POKE U+X+YT*※49,9:GDTOU 128 

52M “ 玉 氷 氷 .7“" こ る オニ" - ネネ 

539 LOCRTE 2 フ ,3:COLOR 2 フ ,2 

549 FOR 1=1 TO 93:PRINT HID$("GRTHTE OUER", 
> トコ J ラ 4MEER3NET 』 

SQ PLRT "RBR BOTO 4g 

DD ^ ポ 氷 氷 ラウ フト "クリ ア - 氷水 

529 COLOR 6:FOR 1=T-1 TO 22 

58 UERTE 29。 TSPRTNT と (3:LOUCRTE 2325, は 1 
IPRINT "信和: 

599 PLRY HID$( "BRGFBRGFBRGF BRGF BRGF BRGF " 
すり SNIEXT は 

699 COLOR 2,2:LOCRTE 23:PRINT "ROUND CL 
ERR『 

B19 LOUCRTE 5,12:PRINT "BONUS 599 島 PTS, 村 " 
62g COULUR,B:LOCRTE 26,21:PRINT “" 時 果 還 
司 団 加 "):COLOR 2:LOCRTE 25,21 :PRINT 「 琴 偽り) 
653 り RER+1 PLRTY 『"+C3C+H+E+FF+E+DD+CB-BRRー- 
じじ よ 上 ヒキ E+DHIRB 

564 FOR 1=1 TOD 19:S=S+59 :GOUSUB 229:PLRT 
"本 し 寺 拉 BB 2NEXT 11BUTU 6M 

65 ^ 米 氷 2 グイ トル ヒョウ ブフ" 水 氷水 

B6g 1NIT "CRT5TSCLS:CEOLBOR 1 

62g FOR 1=9 TO 38 STEP 38:LUOCRTE 1,24:PR 
[NT STRING$(25, "回 国生 ")j:NEXT 1 

589 CDNSOLE 9,25,5,39:CLS:EOLOR 2 

63』 PRINT " 生 /Z1 4 、、 和 14 コ 人 い 、 一 画面 芳 い 、 
29 り PRINT 「 還 1 本 | 男 、| や 較 前 | 議 際 
219 PRINT | 罰 | | 較 ヽ へ 田 牙 。 英 い 
229 PRINT 「! 借 | マ ノ / 還 | ペー/ 和男 男 散 | 回 
"iCOLOR 4 

23g PRINT ! 重い 回 | 較 棋 生 、 還 | ゴ い ヽ 
249 PRINT | 画 / 較 | 較 較 。 較 | 本 半 、| 蘭 
259g PRINT |" 還 ヽ 、 虹 | 回 較 弄 | 回 問い 」 胃 | 
269 PRINT | 画 レ マン 回 且 。 胃 / 胃 軒 1 ジ 
229 COLOR2 フ :CONSOLE 19,15,2,33 iPRINT " 国 ") 
28 り PRINT "JHUTP..  [SPRCE] ORPj:PRINT 欄 


9j" 【[ 還 ]":PRINT 
299 PRINT # の 3"LEFT.,. [BB] / RIGHT...【 昌 "| 
PRINT 

8 COLOR 6:PRINT " 金 "j:FOLOR 2:PRINT " 
.。 、.YOUE ' 

819 COLQR 3:PRINT " 使 "3COLOR 2:PRINT " 
GIRLE 

829 COLOR 5:PRINT " \"j:COLOR 2:PRINT " 
KEY 

839 COLOR 1:PRINT " ロロ iCOLOR 2:PRINT " 
。/ MRRLL 加 

849 CDLOR 4:PRINT "  @eEEREeT 四 " ::COLOR フ 
、9:PRINT ".,.HONSTER 


859 CDOLOR フ ,1:LOCRTE 22,24:PRINT "BY Y.N 
YAUSHIRO0" 

869 PLRT "C フ -C3D4#D5-#D4C-CG3#GG#GG#GG#G 
3!" 

829 COLOR 6,9:LOCRTE 24,16:PRINT "HH 画 IT 還 
ANY 還 KEY 9 回" 


思い は さま ざま に がけ めぐ り 、 眠れ な い 夜 を す ご し レ だ 私 は 翌日 、 も うい ち ど ご 催促 電 話 を か ける つも り で 編集 部 に や つて きだ 。 


昌信 する と 、 宮 後 君 の 返事 は 朝 届 いて いた の だ つ だ 。 う ん 、 そ れ に し て も あの と き の 怪 現象 は な ん だ つ だ ん だ ろう 。 
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つゆ 模 に し サ コ ー 3) ThaRJ 机 に いか は 
- で や むす 本 … 


/ 遊び 万 


キミ は 、 沙 ちこ ぼれ 忍者 の 「 中 村 寅 
太郎 」 く ん で ある 。 (編集 部 注 ・ な ぜ こ 
うい う 名 前 に し だ の か は 不明 ) 

ある 日 、 寅 太郎 くん は 大 根田 村 の 野 
原 に 宝石 が 落ち て いる の を 見 つけ た 。 
当然 、 欲 ば りな 寅 太 郎 は それ を ネコ バ 
バ し よ ょ うと する の だ が 、 そ こ へ 突然 も 
う ひ と り の 巡 者 が 現れ た 。「 あ 、 見 者 アコ 
それ は 負 の 信之 助 。 見 は 、 寅 太郎 を 潤 
か し て や ろう と ワナ を 仕掛 け て いた だ の 
( せ 、 せ こい /) 

衣 い 妃 者 が 寅 太 郎 (キミ )、 赤 い 巡 者 
が 信之 助 。 キ ミ は 、 信 之 助 か ら 逃 げ な 
が ら 、 貢 色 い 宝 石 を 取っ て いこ う 。 


江 ッ ビー 
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い 仙 4 
"っ へ 

PT て UIwm 
も 


や ヤ ビ ) | 
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rar いひ エー TE wu 


NT ロー ャ 9 ・ リ ロニ : マニ 1 ・ ーー ・ に ビニ マト DD テマ ・ いく 
= トウ =11 [ヒビ ロモ ゴ で :B 三 ご 1 : ド ビニ ロロ : し =B :N= 和 も < 
=・ ミミ に oO し OR よこ ン は SO に 上 ょ とし 5 COHSOLE 4 。 23 。 1 。 

Ta = テウ ヒビ 9 | ~g き 3 2 に て 。 1 4: こし うっ: この ON る 
ey つつ 攻 6 0 

つ 1 [は イ レニ レ ャ ト 【 あ ニ ます ニ 
DC の {名 三 リ F w 
1 ュ EE。F: 
し P 


ー| -・ 
て | エズ エイ 


MID いい 
0 そ w :F IPM 


上 1 1 こい 
md と イキ ト トト 


に 放 0 きま 3 
く ヨ マ ュ D= D う 1) を 
や つ 夫 ゆ 多 ご ・ 
に ロ しり "に ーー 「+ 柏 選 
3 ビ =C:F=D:【FT$ー リ し つら 生 TEK 7 PR INT ら ま : ベニ C 
: ヤミ DP し ロイ リャ ォ こ ロ +B「" [ビビ ニー ウロ ロロ HD ャ = ロビ THENBEEP : 
= ラ +19 ウニ INT EREND E1) ま 1 ヨ ) キュ 1 -P=INTCEND(1) 
1 うま ご ナ 1 ご ニニ ンー. ロマ ビニ ニー、 ら 「HEN ご ニテ 。 ラ 
4 COLOR1 : し OCTEX ヤマ PETNTN ま 131F リキ ら 2= リ ー ラ K 
王 K ャ うら 9 (コー トド ) まつ し テレ ナラ ら GN( リ マーレ)* き 2 し OCRTEHN と 
RINTS ま >・COLORS LOCRTEK し L'PETINT' コ 」 1 
1N 生 テレ し し 1F KND/ 4) うこ LOCATEA 5 P に [ に ます 
=K B= ニ し PL し ロロ PT リロ " 。 
> し フレ し り ド ご : し OCRTE ロ BB PRIHTN を 。 COLOE6 LOCnT 
も た O PEPRINT" ! ・- [FR ニ > を (マニ B) ヒ LSEU= 
りす も こう に ロ TE ビ 1 ヨゴ ご ジオ: IMHTHUSTMNG' SCOEE に まま を) 
: ら 3 ユウ て ご ・ 
て いし ウリ ビ る し ひと CRTER . マ : CSEN1 :PEINT" 人 
UTATE 1 TSEN4 EEINTー こ て G 生 問 
EE OVER 才 り iT[ ま =IN ド EE リッ ま エ 1 515 ら T ウ 1 、 - 


回 


移動 の 仕方 は 、 さ す が 忍 者 ./ の ワ 
ー プ の 術 。 カ ー ソ ル ・ キ ー で 水色 の 周 
準 を 動か し 、 ス ペー ス ・ キ ー を 押せ ば 
その 場所 へ ワー プ 。 信之 助 も 同じ 術 で 
追っ て くる ぞ 。 信 之 助 に つか まっ た ら 
泣か され て ゲー ム オ ー バ ー。 

再 ゲ ー ム は 何 か が キー を た た 
《 こと 。 キ ミ は いて つの 宝石 
が び ひろ える か な 。 

田 参 考 一 一 84・5、『NINJA」 


(M5 用 ) 


な ん と も セコ いけ ど 、 楽 しい 
孝 礼 者 同士 の 戦い () 


軒 変 数 リス ト 

X…… 寅 太郎 の XX 座標 

Y…… 寅 太郎 の Y 座 標 

C…… 寅 太郎 の 照 塗 の XX 座標 
D…… 寅 太郎 の 準 の Y 座 標 
A…… 信 之 助 の XX 座標 

B…… 信 之 助 の Y 座 標 

に K…… 信 之 助 の 明 準 の XX 座標 
し …… 信 之 助 の Y 座 標 

〇 O…… 宝 石 の XX 座 標 

P…… 宝 石 の Y 座 標 

( 2 5 所 

Mb…… 礼 者 の キャ ラク 
HH お …… 準 の キヤ ラク 
一 プロ グラ ム の 説明 

1 初期 設定 、 画 面 表示 
ンプ 寅 太郎 物 動 

いつ 宝石 、 ワ ー プ 処理 
4 信之 助 秘 動 

の 宝石 、 ス コア 表示 と 

判断 

5 ゲー ム オ ー バ ー 処 理 
田 チ ェ ッ フク フ ボ ポイ ント 

画面 を 最大 限 に 利用 し て 作 つ 
だ 、 だ い へ ん よい ゲー ム だ と 思 
いま す 。 ハ イス コア を 入れ よう 
と 思い まし だ が 、 ど うし て も 1 
画面 に 入り ませ ん で し た だ 。 

どう し じ て も 入れ だ いと いう 人 
は 1 画面 に ひみ サ わ ら ざ 付け だ し 
て みて ぐだ きい 。 (エイ キチ ) 


山科 さん は “お に ′ な ん で す 。 ゆ み は 内 届 、( こ の 仕事 は 明日 で も いい だ ろう なぁー) と 決め つけ て 、 山 科 さ ん に 「 ご これ 明日 で う の 
いい で す よ ね エ 」 と 聞い て みる と 、 お も お ろ に 首 を 横 に ふ ぬる ん で す 。 え ーー ん 、 え ーー ん 。 


クノ グン ここ 0Z プ W@ 


キー さば きだ け で は 生き 残れ な い 


FOR Z-200072200780 68-5520 BY 堀 沢 栄 
] | 上 まい に 1 


~ー HI-SCORE 811498・ 9611496 bu 了 2 ま けり 


@ は 紋 め に も 動き 、 〇 は 画面 両端 で ワ 
ー ブ " し て くる 。 キ ミ に 与え られ た 技 は 

- 見 、 よ くわ か ら な い 画 面 だ けど 、 〇 と 同じ 画面 両端 の ワー プ と 、 と ころ 
が の わか の で (る と 、 六 か な か エキ だ ころ に ある アタ ダ タック ・ パ バー())。 ア 


H 日 ロ OH  @ 間 こ 」 
HHR 1 サイ テイ ング な ゲー ム な の だ 。 ちょ っ タッ ク ・ バ パー の 右 か 左 で スペ ー ス ・ キ 
H も だけ 、 人 ロー ドラ ンチ ナー チッ ク な よこ ー を 追 す た 、 を その 方 向 へ 筐 スピ ー ド で 

ろ も ある 。 ダッ シュ で きる の だ 。 敵 に あたる と 敵 


TOM kun(#) を |2|416I8I の キー で 。 _ が ちょ っ と の あい だ 気絶 する 。 パ ズル 
操作 し て 、 画 面 に 散ら ば る お 人 金 ($) を 的 なむ もし ろ る も ある ゲー ム だ ぞ 。 
今 、 せ は 右 か ら 左 へ ワー プ し よう と の の で 0 つう 。 


し て お り ま す ! 4 個 ひ ろ え ば 、 ま SCORE ロ 88198 
ず は 1 面 ク リア 。 ROUND 1 
と IN NN 8 W W W BI 8 5 BI W 8 8 8 こ ]) 
W と つも M し 日 5 びに 、 ど ん どん キ 
IE 4 0 ・ 六 2 HT-SCORE H114 ロ 8 bu 2 ま * 
1 時 
ナ 2 を 由 和 キ - 
1 の TE 拉 だ ス 2 HHH _e 
1 > 8 る き 1 ボール (O ょ フラ [ 上 
上 つっ ッ ク ボ ポー け 
『 し の のり 昌和 ロク リツ る う 中 H HH H H 
ms て 速 と 』 は わん 追い か け て き て 、 RTRR555O5 
lm お 続 さ | 近 れ で H HHH 
mn まで わ ゃ っ 7 H $ = HHH $HHH 
ナー す の ツ し が | 
(て が で _ y や り ま し た 。 ほ と 1 
また か す 両 圧 W 0 H HHH 
lm 3 ん ば げ A % 親 惨 B ん ご ど ご つう つ な つ だ か が わ HHH 6 HHH 
EE ガ から な い ワ ー プ 1! 


99 DIMT$(7) ,V(39.22):H=9:H$= "OOO" ETEMPO7 

199 CONSOLEC49 ,S9 ,24.N:PRINTCHR も (6 ) : 

0 人 全 US の ーーー ニ ーー ビーー に つき デー 

129 T$ も (2)=" ヒー プロ kk 3 YY 

139 T$(3)=" | | kl 咲 | 1" 

1 49 4 11I 園 

150 

160 

170 PP 

189 FORI=1TO7:PRINTTAB(7):T$ も (TE):NEXT:PRINT:PRINT" KEY FUNCTION .& CHARACTERS" 


・PRINT 

199 PRINT" ーー 「 井 」、、.TOM kun 

299 PRINT" 18 1 

219 PRINT" レー ゴ 『O」.。。 "whiteBa11 
229 PRINT" エーーー コーヒ コー 

239 PRINT"ISPACE1 14|I 「@」. . . "BlackBa11" 
249 っ 


<・・IOTnCY 


269 PRINT" 121 

279 PRINT" ーー に ュ .・・Attack bar":PRINT 

289 CURSORS5,29:PRINT"Let'S take bacKk much money !! "ECURSOR12.,23:PRINT"HIT ANY K 
EY 1!119EMUSIC"E3AEAEAEDFAFAB+CB1RBRBRBA3GGA " 


299 GETK$: IFK も =" "THEN299 

399 5=9:M=3:R=1:M$= "EEFGFDDDEGABAAG" :MU=1:U=9:PRINTCHR$( 6 ) 
319 FORL1=9TO39:FORL2=8TO22:V(L1,L2)=9:NEXTL2 ,L1 

329 PRINTCHR$ も (6)1::FORI=1TO7:PRINTT も (i) : NEXT 


339 PRINTTAB(8)j "HI-SCORE by ":CURSOR25 ,9 
349 PRINT"r ュ ":PRKINTTAB(25)j "1SCORE "iPRINTTAB(25)5 "| 
1":PRINTTAB(25): "1ROUND "EPRINTTAB(25) 1" 
359 PRINTTAB(25): "IMAN "iPRINTTAB(25) 1 "上 "ECURSOR9,8:PRINT 
SPACE$( 39 ) 


369 ONRGOSUB999 , 1959, 1339 ,999,1959 ,1339,999,1959 ,1339,999,1959,1339 

389 GOSUB889:FORL1=9T039:FORL2=8TO22:IFV(L1.L2)=1THENCURSORL1。L2:PRINT" " 

399 NEXTL2,L1:X=19:Y=19:A=38:B=9:C=29:D=12:Q=32:W1=32:W2=32:Z1=9:Z2=9:N=9: し =9 
499 CURSORX,Y:PRINT" 持 "ECURSORA,B:PRINT " "ECURSORC ,D:PRINTCHR も ( 1 47 ) 

419 FORI=1TOR 

429 R1=INT(RND(1)x38+1 ):R2=INT(RND( 1)x15+9):IF(CHARACTER$(R1.R2)=" ")x((CHARACT 
ER$ も (R1 ,R2+1)=" 圏 ")+(CHARACTER$(R1 ,R2+1 ) ="H" ) )THENCURSORR1 ,。R2:PRINT "も "::GOTO449 

439 GOTO420 

449 NEXT:DEF KEY(8)=POKE$952 , 166 

459 MUSIC"+A1R+AR+AR+AR+AR" : POKE$952,9 

469 E=9:G=9:IFCHARACTER$(X,Y+1 ) く >CHR も (31 )THENIFCHARACTER も $(X,Y+ 1 ) く >CHR も (48 )THEN 
G=1 :GOTO599 

479 GETK も $:IFK も =" "GOTO739 

489 E ビ =(K$ も ="4")-(K も ="6"):G=(K$ も ="8")-(K も ="27):IFCHARACTER も $(XTE,Y+G) =CHR$( 31 )THENE 
= :G=9 

499 ONG+E+ 1GOTO5169 

599 CURSORX,Y:PRINTCHR も (Q) 1 :X=X+E:Y=Y+G:ONX+ 1GOSUB659 : ONX-38GOSUB669:Q=ASC(CHAR 
ACTER$(X,Y) ) :CURSORX ,Y:PRINTCHR も (も 23 ) : :ONQ- 35GOTO1 2099 

S19 ONZ1GOTO559:J=9:K=9:IFCHARACTER$(A,B+ 1 ) く >CHR も (31 )THENIFCHARACTER$(A,B+ 1 ) く >C 
HR$($48 )THENJ= 1 : GOTO549 

S529 J=(Y く <B)-(Y>B):IF(CHARACTER$(A, B+J ) =CHR$ も (も 48 ) )+(CHARACTER も (A,B+J ) =CHR$ も (も 23 ) ) 
THEN549 

539 J=9:K=(X く A)-(X>A):IF(X-A>29)+(A-X>29 )THENK= ( X>A ) - ( X く <A ) 

S49 IF(CHARACTER も (A+K, B+J ) =CHR$( 31 ) )+(CHARACTER も (A+K 。B+J ) =CHR$( 1 47 ) ) THENK=9 :J=9 

545 CURSORA,B:PRINTCHR も (W1)::A=A+K:B=B+J:ONA+ 1GOSUB679:ONA-38GOSUB689:W1=ASC(CH 
ARACTER$(A,B) ) :CURSORA , B:PRINTCHR$ も (148)::IFA=XTHENIFB=YTHEN1 299 

S59 ONZ2GOTO599:N=9:L=9:IFCHARACTER も (C,D+ 1 ) く >CHR$( 31)THENIFCHARACTER$(C。D+ 1) く >C 
HR$($48 )THENL= 1 : GOTO589 

569 N=(X<C)-(X>C) : し =(Y く <D) -(Y>D) : IFCHARACTER$(C+N,D+L) =CHR$( 31 )THENL=9 

579 IFCHARACTER も (C+N,D ) =CHR$( 31 ) THENN=9 

589 CURSORC,D:PRINTCHR$(W2)::C=C+TN:D=D+L:ONC+ 1GOSUB719:ONC-38GOSUB729:W2=ASC(CH 
ARACTER$(C,D) ) : CURSORC,D:PRINTCHR$( 147)::IFC=XTHENIFD=YTHEN1 299 

599 ONZ1+Z2+1GOTO619.699,699 

699 IF(RIGHT も (TI も $,1)="3")+(RIGHT も (TI も ,1)="6")+(RIGHT$ も (TI も ,1)="9")THENZ1=9:Z2=9: 
MUSIC"-B9-A" 

619 IFW2=148THENW2=W1 

639 ONMU-15GOSUB7009 

649 MUSICMID$(M$,MU 1)+ "9":MU=MU+ 1 :GOTO469 

659 X=38:RETURN 

669 X=1 :RETURN 

679 A=38:RETURN 

689 A=1:RETURN 

799 MU=1:RETURN 

719 C=38:RETURN 

729 C=1 :RETURN 

739 IFCHARACTER も $(X+ 1 。Y ) =CHR も (も 3A )THENE=- 1 :GOTO769 

749 IFCHARACTER$(X- 1 ,Y) =CHR$($3A )THENE= 1 :GOTO766 

759 GOTO5090 

769 CO=9:CURSORX-E,Y:PRINTCHR$( 32 ) 

779 Q$=CHARACTER$(X+E。Y ) 

789 IFQ$=CHR も (147 )THENZ2=1:S=S+299:E=9:GOSUB899:MUSIC"A1B":GOTO519 

799 IFQ$=CHR$ も (148)THENZ1 =1:S=S+299:E=9:GOSUB899:MUSIC"A1B":GOTO516 


899 CURSORX,Y:PRINTCHR$(Q) ) :X=X+E:ONX+ 1GOSUB659 : ONX-38GOSUB669 : Q=ASC(CHARACTER$ 


(X,Y)):CURSORX, Y:PRINTCHR$( $23) : 
819 IFQ=36THEN1 209 
829 CO0=CO0+1:ONCOGOTO0779,.779.779,779,519 


989 CURSOR17.7:PRINTRIGHT も ("99999"+STR$(H) ,6):TAB(29 ) :H$ :CURSOR32 , 3:PRINTR:CURS 


OR32.5:PRINTM 
899 CURSOR32 ,1:PRINTRIGHT$ も ("99999"+STR$(S) 、6 ) : RETURN 


999 PRINT" 
919 PRINT" H : H HHH H も 『" 
929 PRINT " 男 較 日間 間 間 間 間 間 間 間 間 昌明 日 間 間 間 間 面 | 日間 昌 昌 間 昌 昌 間 日間 間 間 間 昌 凍 
939 PRINT" HHH HHH HHH HHH 
949 PRINT" HHH H HHH HHH ・ 。 HHHH 上 
959 PRINT " 王 庫 間 間 間 間 間 間 間 間 間 間 間 間 間 間 昌 間 日 日 間 昌 間 間 間 昌 昌 間 日間 間 隊 
969 PRINT" HHH HHH H 0 
979 PRINT" HHH H HHH 1 
60M 放 UhuhpwmwvWW 上 や 5 や 。'〈'、、 | 
999 PRINT" HHH HHH HHH “" 
1999 PRINT" H $ HHH HHH H HHH 


7/ ロ ゲラ ム 
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ア 
ツェ ッ ト 


ング ググ 塗り 000 ど ジル @ 


へ 洛 
n ロ ツー メル 深 
テス スニ 


の 


ジェ ッ ト / ず この まえ 気がつい た こと な ん だ 。 み ん な に 教え ちゃ お う 。 ゆ め み と よ ー こ で 以 て る と 一 致し だ た の だ 。 な ん と 、 ジ ヤマ 森 を 右 独 め 7 


表 個 1 あ 


後ろ 部 分 か ら 見 る と 、 あ の ロス 回 惑 の 三浦 さん に 似 て る の だ 。 と くに 耳 と 耳 に か か る 髪 の へ ん が -… 大 発見 な の だ 。 


\ ヶ 
$ 


NEY < 壮 は MIN ロ | へ 尋 居 上 INN ロ と 中 キ る 三 きす へ へ ご 


TOM kun の つづ びき 


1919 
1929 
1939 
1949 
1959 
1960 
1970 
1980 
1990 
1199 
1110 
1129 
1139 
1149 
1159 
1169 
1179 
1189 
1199 


PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" ・RETURN 

1299 V(X,Y)=1:MUSEC"+C+D" ES=S+199:GOSUB899:U=U+1:IFU く <R+3THENQ=32:GOTO0469 

1219 MUSIC"R3AB+CBR1 BRBRBRBRB3A+C+D" :U=9:S=S+599+MX199:GOSUB889:IFR く 12THENR=R+ 1 
:GOTO319 

1229 CURSOR3.9:PRINTSTRING$S( "ここ ".33 ) :CURSOR4 ,19:PRINTSTRING$(" こ "31) :CURSOR5,11: 
PRINT"C ongratulation ss":CURSOR4.12:PRINTSTRING も ("ここ ",31 ) 

1225 CURSOR3,13:PRINTSTRING も ("ここ ". 33):FORT=1TO03:MUSIC"G9RGRGRGRGAB3+C+D+E+D+E+D+ 
E+F4":NEXT 

1239 IFS= く HTHEN1 259 

1249 POKE$952.166:H=S:CURSOR19,15:PRINT "You set new record":CURSOR9 , 1 7:PRINTSPA 
CE$(39) :CURSOR12.17:INPUT "Your name "jiH$:H$ も =LEFT も $(H$ も , 19) :CURSOR29,7 

1259 PRINTSPACE も ( 19 ) :GOSUB889 :CURSOR1 1 ,19:PRINT "STOP "E′ KEY" 
PRINT "REPLAY OTHER KEYS" 

1269 GETK も $:IFK$= "E"THENPOKE$952.166:PRINTCHR も (6 ) : END 

1279 IFK$=" "THEN1269 

1289 GOTO 399 

1299 M=M-1:MUSIC"C3-B-AR6":GOSUB889:IFM>9GOTO0329 

1399 CURSOR7 ,19:PRINT "エー エコ ロコ デコ ニー ビ コ エ イエ エエ デコ レコ " 

1319 CURSOR7,11:PRINT "1 コト ゴゴ 111H 1 11 1H F ト デリ ヅ 

1329 CURSOR7、12:PRINT "コー ーー エーーー ヒー ヒエ ーー ブー ピロ “ 

1339 PRINT" 

1349 PRINT" H H 6 H 

1359 PRINT " 還 証 還 昌 [ 必 語 商 | 商 隊 2 の CEKNNGDRWRRS 5 交 

1369 PRINT" H H H 人 

1379 PRINT" H H HHHHHHHH $ H 

1389 PRINT " 加里 雇 衣 間 還 証 明 証 症 時 HHHHHHH 男 証 間 証 間 選 骨 

1399 PRINT" HHH$SHHH HHH 

1499 PRINT" H HHHHHHH  : H HHH 

1419 PRINT" 上 。 且 邊 

1429 PRINT" HHHHH HHH HH 

1439 PRINT" ・ H HHHHH HHH H HH 


RETURN 


・CURSOR1 1 ,21: 


MUSIC"D3C-D-A-G-F1R-FR=FR-PR-P 


1449 PRINT" 
1459 PRINT" 
1469 PRINT" 
1479 PRINT" 


一変 数 リス ト 
H…… ハ イス コア 
日 $…… ハ イス コア 保持 者 


M……TOM Kun の 数 
MU……BGM の カウ ンタ ー 
M$……BGM の デー タマ 


VC ) …… 固 定 し て 置か れ だ お ・ 


金 の 座標 
X……TOM kun の XX 座標 
Y……TOM Kun の YY 座標 
〇 O……TOM Kun の 消去 用 
E……TOM kun の XX 座 標 増 

の 


G……TOM Kun の Y 岸 標 増分 ・ 


A……White Ball の X 誰 標 
B……White Ball の 座標 
YNS White Ball 消 去 用 


・ 田 プ ログ ラム の 説明 


90 一 170 初期 設定 


・ 1290-1320 


・ K……White Ball の XX 座標 増 ・ 550-580 Black Ball 移 動 
分 ・ 590-600 Ball の 復活 
・ J……White Ball の Y 座 標 増 ・ 610 Ball が 重 な つ だ 場合 
分 の 処理 
・ C……Black Ball の X 座 標 ・ 630-640 BGM 
・ D……Black Ball の Y 座 標 : 650-720 ワー フ 負 理 
・ N……Black Ball の XX 座標 増 ・ 730-820 Attack bar の 処 
分 理 

し ……Black Ball の Y 座 標 増 ・ 880ー890 スコ ア 等 の 表示 

分 ・ 900-1190 画面 1、2 

・ R…… ラ ウン ド 数 ・ 1200-1280 面 フ リア 、 ゲ ー ム 
・ 征 $( )…… タ イト ル 文 字 | オー バー の 処理 


志 


・ 180-290 タイ トル デモ ・ 1330-1470 画面 3 

300-450 変数 初期 化 、 画 面 作 ・ 田 チ ェ ッ フ ポ イン ト 
・ 成 ・ 慣れ な いう ち は 、 ア タッ フク バ ・ 
・ 460-500 TOM Kun 移動 ・ 一 の 使い 方 が 難 か し いと 思い ま : 
・ 510-545 White Ball 物 動 ・ す が 、 高 得点 を ね ら う に は 、 ご ・ 


・ の アタ ッ ク バ ー と ワー プ を うま 
・ ご 使い こなさ な けれ ば な り ま せ 
・ ん 。 TOM kun の 人 数 を 増やす 
・ の は 、100 行 の M= ニ 3 の 数 値 を か 
区 で くだ き じい 


まだ 、 画 面 を 自分 で 作り な お 


・ す の も 、 お も し ろ い で し ょ よう 。 


全部 で 12 ラ ウン ド あ り ま す の 


・ で が ん ば つて こ だ さ い / 


ここ の CGC し ルク 0 孝介 6 


・ も と も と チエ ツ カ ー フ ラッ グ だ 
・ つ だ キャ ラク を 黒 四角 に し て 
ゲー ム オ ー バ ー 表 ・ 
・ お と き は 、 黒 四角 を すべ て 、 チ 
・ エッ カー フラ ッ グ (CHRS$(31) 

・ の キャ ラク マタ) に し て こく ださい 。 


リス ト を 出し て いま す 。 打ち 込 


(エイ キチ ) 


を か ける ほど 、 各自 の ツバ コ 消 費 量 を 上 げ だ 。 実 は この 原稿 を 書 < 手 も か すん で いる の だ 。 


お 天 > 2 禁煙 バイ ポ ボ を 吸 つ だ あと の 1 服 が 大 好評 。 勧 煙 バ イボ と も いえ る ご の 麗 連 の シロ モノ ン は 、 つ い に 編 集 室 に カス ミ 


提 面 9 


足 で 探っ て 宝物 を 掘り あて ろ / 


F0OTMWC NMD BU6! ンジ 


遊び 万 


足 あ と の フッ トマ ッ 
ク を [214I6I8I で 操作 し 
て 、 迷 踏 の な か を 足 探 
り (?7) し な が ら 、 宝 物 
を 喝 つ けり 当 し て いく (、 
ちょ っ と 変わ っ た 宝 探 
と に か が く 、 カ ン て 形 


4 な ガ な が 楽し そう お 宝探し の キャ ヤラ 
ツタ 総 登場 。 


oN _ M 有 W 上 見 W 計 計 5 まき 旧 計 半 記 


1 だ 何ら 蛇 で な ナ 9 名 KeENc2 > 愉 に み し 3 

6 あ = る 夢 、 1 1 い 1 鳴っ た と ころ に 何 か が が 人 4 ベタ ッ ツ ベ タ ダッ 。 足 探り で 埋もれ だ 宝 を 探し て い ぐ 。 

『 - に 埋め ゆら れ て いる 。 を そこ 

1 エ 普 す ー ンー 1 で て 、 ス ペー ス ・ キ ー を 押す と 掘り 出す バグ は 4 種類 。 これ が それ ぞ れ ラン ダ 
ダー 27 3 こと が で きる の だ けど ……、 宝物 ば か 。 。 ム に 組み あわ され て 出 て くる の で 、 次 
tt Pe ] り と は 限ら な い 。 ス ター ト 画 面 で 紹介 の 面 が どん な 面 か わか ら な いと ころ が 
ョ だ 滋 と - きれ て いる ドク ロ ・ マ ー ク だ っ た ら 、 お も しろい 。 も ちろ ん 、 バ グ に つか ま 
5 、 い 71 1 人 アウ ト 。 宝物 な ら そ れ ぞ れ の 得点 っ た ら ア ウト だ か ら 気 を つけ よう ね 。 
し 着 残 D が プラ ス さ れる 。 宝 を 3 個 据 0 出 す と と ころ で 、 こ の ゲー ム に も 隠れ キャ 
M ん ん は は 和 1 面 ク リア で 次 の 面 へ 。 ラ あ り 、 ヒ ント だ け 教 えも ちゃ お な う 。 る を 
eo02 ce" 面 の 彩 は 4 パタ ー ン 、 ジ ャ マ を する れ は 、 壁 の な か に あり ます / ソ 


CLEAR:RANDOMIZE TIME:SCREEN 1:WIDTH 89:COLOR 7.9:CLS 
29 H=9:DIM MX(1) ,MY(1).F(1) DA(19.11) 

39 GOSUB 859 

49 S=9:M=5 

59 FO=1:SS=9:CLS:FOR I=9 TO 19:FOR J=9 TO 11:DA(1T,J)=9:NEXT :NEXT: SOUND 82,4 
69.F(9)=1:F(1)=1 

79 Q=RND( 1 ) 4 

89 IF Q<1.8 THEN RESTORE 1319 ELSE IF Q>=1.8 AND Q<2.8 THEN RESTORE 1349 ELSE IF 
Q>=2.8 AND Q<3.5 THEN RESTORE 1379 ELSE RESTORE 1499 

90 FOR J=9@ TO 11:FOR 1I=9 TO 19:READ A:DA(I.J)=A:IF A=9 THEN 199 ELSE XS=Iw8:YS=J 
\8+2:GOSUB 849 

199 NEXT:NEXT 

119 R=INT(RND( 1 ) x4+1 ) 

129 FOR !=@ TO 1 

139 GOSUB 499:MX(1)=XX:MY(I)=YY 

149 NEXT 

159 GOSUB 499:IF XX=MX(9) OR XX=MX(1) OR YY=MY(9) OR YY=MY(1) THEN 159 ELSE X=XX 
・Y=YY 

169 FOR 1I=2 TO 6:GOSUB 499:DA(XX,YY)=I:NEXT 

179 XX=INT(RND( 1 )*29):YY=INT(RND(1)x12):IF DA(XX.YY)=1 THEN DA(XX.YY)=7 ELSE 179 
189 XS=Xx8:YS=Yx8+2:GOSUB 459 

199 FOR I=9 TO 1:XS=MX(T)x8:YS=MY([)x8+2:ON R GOSUB 539.619,659.739:NEXT 

299 


ラ 、 つ い に 発 見 ! の 
感動 的 画面 。 


239 IF Ks&HFB THEN X1=9:Y1=1:FO=3 ELSE IF K=&HEF THEN X1=-】:Y1=9:FO=2 ELSE IF K= 
&HBF THEN X1=1:Y1=9:FO=4 ELSE IF K=&HFE THEN X1=9:Y1=-1:FO=1 ELSE IF K=&H7F THEN 
369 ELSE 3 

249 IF DA(X+X1 .Y+Y1)=1 THEN 399 ELSE LINE(XX8、Yx8+2)-(Xw8+7。Yw8+9),9、BF:X=X+X1:Y 
=Y+Y1:XS=Xw8:YS=Yx8+2:ON FO GOSUB 459.479.499.519 

259 SOUND 89,1:SOUND 74、1 

260 IF X=MX(9) AND Y=MY(9) OR X=MX(1) AND Y=MY(1) THEN GOSUB 1439:IF M=9 THEN 11 
99 ELSE 59 


FOR 1=9 TO 2:FOR J=@ TO 14 STEP 2:SOUND 82-J,2:SOUND 9,1:NEXT:NEXT 本 1 
219 FOR B=9 TO 1 続 次 リ 
229 X1=9:Y1=9:OUT 48,127:K=INP( 49) 【4 ス 


ク ググ ググ \VaO5VJe 


と つ ぜ ん 赤い の が バッ と 現れ て 、 足 マー ク と 重ね なつ ち ゃ うと 死ん で し まう ん だ けど 、 こ の 赤い や つ は 予知 で き な い か ら オ ソロ 


シイ の だ 。 ど くろ を 見 つけ て し まつ だ と き の 光 線 の 色 が も つと きれ い だ つ だ ら 、 す ご ー く いい と 思う な ぁ ー。 ン ル 


HN 半 NN ロ Ndh 光 は AO 人 衣 と ervrv 党 AI へ 三光 光る と MIN ロ N 届 滞 き ツキ 


トコ 


* ヽ dl 缶 ロ om い 先 一 


置 変数 リス ト 
H…… ハ イス コア 
Ne See ンー 


XX,Y…… フ ブツ ッ ト マ ッ ツ の 座標 

し 2 に マツ の の 
移動 の 際 の 増分 

M…… フ ッ ト マ ッ ク の 克 り 数 

FO…… フ ツ ッ ツ ト マッ の 向き 

MX JIMY ) モン バター の 

| 座標 

どら イジ ジー シス ター の 物 
動 の 際 の 増分 

R…… モ ンス ター の 種類 

F( )…… モ ンス ダー の 向き 

DA( )…… 仮 想 V-RAM (そこ 


に な に が ある か が ) 
次 GY つつ" 宮 ギ ヤ ラク タ 克 表 
示す る 時 の 座標 
2 YO 品数 に よる 双 キ ヤ 
ラノ タ の 初期 座標 
A…… 迷 路 の デー タツ 読み 込み 用 
〇 の 迷路 の 種類 


らら …… 取 つ だ 宝 の 数 

K…… キ ー ス キヤ ン 用 

田 プロ グラ ム の 説明 

10- 60 初期 設定 

70 一 100 画面 作成 

110-200 苔 キ ヤラ 座標 決 


定 、 表 示 
210 メイ ン ル ー チ ン の 頭 
( 動 お す モ ンス ダー 
の 指定 ) 
220 で 250 キー スキ ヤン と フッ 
トマ ッ ツ の 移動 
260<280 何 ひ け に あ だ つ だ か 
290 面 ク リア か ガ の 判断 


300 ご 350 モン スマ ター の 移動 、 
メイ ン ル ー チ ン 頭 へ 
360-370 穴 を 掘る 、 宝 が 出 だ 
と き の 処 理 
380390 SKULL を 掘 つた 、 
ゲー ム オ ー バ ー 判 断 
400 各種 キャ ラフ マタ 、 初 
期 座標 決め サブ ルー 
チン 
410 こ 440 モン スマ ター の 向き に 
より 、 名 表示 ルー チ 
ン に 飛ば す 
450-840 各 キ ヤラ フタ 表示 サ 
ブ プルー チン 


6 や テッ 


FOOT MACK & BUG の つづ き 


279 IF DA(X.Y)=7 THEN 1 の 49 ELSE IF DA(X,Y) THEN FOR I=9@ TO 3:FOR J=89 TO 69 STEP 
-3:SOUND J-2,1:NEXT:NEXT 

289 GOTO 399 

299 DA(X,Y)=9:IF SS=3 THEN LOCATE 26.19:PRINT CHR$(&HFD):“"[ ROUND CLEA 
R ] "::FOR U=9 TO 399:SOUND 79,.1:NEXT:GOTO 59 

399 ON R GOSUB 1189.1299,1259,1309 

319 LINE(MX(B)*8.MY(B)x8+2)-(MX(B)x8+7。MY(B)x8+9),9,BF 

329 IF R=4 THEN MX(B)=X2:MY(B)=Y2 ELSE MX(B)=MX(B)+X2:MY(B)=MY(B)+Y2 

339 XS=MX(B)x8:YS=MY(B)x8+2:ON R GOSUB 419.420.,439 ,449 

349 IF X=MX(B) AND Y=MY(B) THEN GOSUB 1439:IF M=9 THEN 1199 ELSE 59 

359 NEXT:GOTO 219 

369 IF DA(X,Y)<2 THEN 399 ELSE XS=Xx8:YS=Yx8+2:LINE(XS,YS)-(XS+7.YS5+7).9。BF:ON D 
A(X,Y)-1 GOSUB 759.769.779.799.899,829:IF DA(X,Y)=6 THEN 389 ELSE S=S+(DA(X,Y)-1 
)x199:SS=SS+ 1 

37@ FOR !I=9 TO 39:SOUND INT(RND( 1 )x39+59) ,2:NEXT:GOTO 299 

389 FOR 1=9 TO 29:LINE(XX8+4.Yx8+6)-(INT(RND(1)x169),INT(RND( 1 )x199) ) ,INT(RND( 1 ) 
\%7+1 ):S0UND 89.3:NEXT 

399 M=M-1:IF M=9@ THEN 1199 ELSE 56 

499 XX=INT(RND(1)*18+1):YY=INT(RND(1)x19+1):IF DA(XX,YY) THEN 499 ELSE RETURN 
419 ON F(B) GOSUB 539,559,539,559:RETURN 

429 ON F(B) GOSUB 579,599、619,639:RETURN 

439 ON F(B) GOSUB 659,679.699,719:RETURN 

449 GOSUB 739:RETURN 

459 LINE(XS+ 1 ,YS+2)-(XS+5,.YS+7) 、6.BF:LINE(XS+5 ,YS)-(XS+6 YS+1).6.BF:LINE(XS+5,YS 
+5)-(XS+5,.YS+6),9 

469 PSET(XS+3,YS) ,6:PSET(XS+1 、YS+1 ) ,6:PSET(XS,YS+2) 6:PRESET (XS+1 ,YS+2):PRESET(X 

S+ 1 , YS+7 ) : PRESET (XS+ 5 , YS+2 ) : RETURN 

479 LINE(XS+2、YS+1 )-(XS+7.YS+5) .6,.BF:LINE(XS,YS+5 ) -(XS+1.YS+6).6.BF:LINE(XS+5,.YS 
+5)-(XS+6.YS+5) .9 - 

489 PSET(XS+2,.YS) ,6:PSET(XS+ 1 .YS+1) 6:PSET(XS, YS+3) ,6:PRESET (XS+2 .YS+1):PRESET( 

XS+2 。YS+5 ) : PRESET (XS+7 。 YS+ 1 ) : RETURN 

499 LINE(XS+2.YS)-(XS+6.YS+5).6,.BF:LINE(XS+1 、YS+6)-(XS+2.YS+7).6、BF:LINE(XS+2.YS 
+1 )-(XS+2.YS+2).9 

599 PSET(XS+4.YS+7) ,6:PSET(XS+6.YS+6) ,6:PSET(XS+7,YS+5 ) , 6 :PRESET (XS+6 , YS ) : PRESET 
(XS+2.YS+5) : PRESET (XS+6 ,YS+5 ) : RETURN 

519 LINE(XS,YS+1 )-(XS+5.YS+5),6.BF:LINE(XS+6,YS+5)-(XS+7.YS+6).6,BF:LINE(XS+1.YS 
+5)-(XS+2.YS+5).9 

529 PSET(XS+5,YS) ,6:PSET(XS+6, YS+1 ) ,6:PSET(XS+7 ,YS+3) , 6:PRESET( XS, YS+1 ) :PRESET(X 

S+5 ,YS+ 1 ) :PRESET(XS+5 YS+5 ) : RETURN 

539 LINE(XS+1,YS)-(XS+2、YS+1),.4.BF:LINE(XS+4.YS)-(XS+5,YS+1) ,4。BF:LINE(XS, YS+3 ) - 
(XS+1.YS+7),6,BF:LINE(XS+2.YS+2)-(XS+4.YS+7).6.BF:LINE(XS+5,YS+4)-(XS+6.YS+7 ) ,6。 
BF:LINE(XS+4.YS+3)-(XS+4.YS+4).9 

549 PSET(XS+7.,YS+7 ) ,6:PRESET(XS, YS+3 ) : PRESET (XS ,YS+7 ) :PRESET (XS+3,YS+2 ) :PRESET(X 

S+3.YS+5 ) : PRESET (XS+5 , YS+7 ) : PRESET (XS+6 , YS+4 ) : RETURN 

559 LINE(XS+2,YS)-(XS+3,YS+1) ,.4.BF:LINE(XS+5,YS) -(XS+6 ,YS+1) 4、BF:LINE(XS+6 YS+3 
)-(XS+7.YS+7).6.BF:LINE(XS+3,YS+2)-(XSt5.YS+7) .6.BF:LINE(XS+1 ,YS+4)-(XS+2。YS+7 ) , 
6.BF:LINE(XS+3,YS+3)-(XS+3.YS+4),.9 

569 PSET(XS,YS+7 ) ,6: PRESET(XS+7 ,YS+3) : PRESET(XS+7 .YS+7 ) : PRESET (XS+4 。YS+ 2 ) : PRESET 
(XS+4 ,YS+5 ) : PRESET( XS+2 . YS+7 ) : PRESET (XS+ 1 YS+4) : RETURN 

579 LINE(XS+1 YS)-(XS+1 .YS+1)、3:LINE(XS+6 YS)-(XS+6 ,YS+1).3:LINE(XS、YS+4)-(XS。YS 

+6) ,3:LINE(XS+7,YS+4)-(XS+7.YS+6) ,3:LINE(XS+1 YS+7)-(XS+6,YS+7) .3:LINE(XS+3.YS+t 1 
)-(XS+4.YS+3) ,3.BF 

589 LINE(XS+1 、YS+3)-(XS+2、YS+2) 3:LINE(XS+5,YS+2)-(XS+6.YS+3) ,3:LINE(XS+2.YS+4 ) - 
(XS+5,YS+6) ,2.BF:LINE(XS+2。YS+5 )-(XS+5,YS+5) ,3:PRESET(XS+2 .YS+7) :PRESET (XS+5,YS+ 
7 ) : RETURN 

599 LINE(XS,YS+1 ) -(XS+1 、YS+1) 3:LINE(XS,YS+6) -(XS+1 .YS+6) ,3:LINE(XS+4 YS) - (XS+6, 

YS) ,3:LINE(XS+4,YS+7)-(XS+6,YS+7).3:LINE(XS+7 .YS+1 ) -(XS+7 .YS+6) 3:LINE(XS+ 1 ,YS+3 
)-(XS+3.YS+4) ,.3。BF 

699 LINE(XS+2。YS+2)-(XS+3。YS+1) 、3:LINE(XS+2.YS+5)-(XS+3.YS+6).3:LINE(XS+4.YS+2 ) - 
(XS+6,YS+5 ) ,2。BF:LINE(XS+5、YS+2)-(XS+5,YS+5) ,3:PRESET (XS+7 , YS+2) :PRESET(XS+7 , YS+ 

5 ) : RETURN ! 

619 LINE(XS+1 YS+6)-(XS+1、YS+7) 3:LINE(XS+6.YS+6)-(XS+6.YS+7) .3:LINE(XS, YS+1)-(X 

S,YS+3) ,3:LINE(XS+7.YS+1)-(XS+7、YS+3) ,3:LINE(XS+1 YS)-(XS+6 ,YS),3:LINE(XS+3,. YS+4 
)-(XS+4.YS+6),3,BF 

629 LINE(XS+1 .YS+4)-(XS+2.YS+5) ,3:LINE(XS+5.YS+5)-(XS+6、YS+4) 3:LINE(XS+2 YS+ 1 )- 
(XS+5,.YS+3) ,2。BF:LINE(XS+2、YS+2)-(XS+5 .YS+2) ,3:PRESET(XS+2 YS) :PRESET (XS+5 .YS):R 

ETURN 

639 LINE(XS+6,YS+1)-(XS+7、YS+1).3:LINE(XS+6 YS+6 )-(XS+7、YS+6).3:LINE(XS+ 1 .YS)-(X 

S+3,YS) ,3:LINE(XS+1.YS+7)-(XS+3.YS+7) 3:LINE(XS,YS+1)-(XS,YS+6),3:LINE(XS+4,YS+3 
)-(XS+6.YS+4),.3,.BF 

649 LINE(XS+4,YS+1)-(XS+5、YS+2) 3:LINE(XS+4,YS+6)-(XS+5.YS+5) ,3:LINE(XS+ 1 ,YS+2 ) - 
(XS+3,YS+5) ,2.BF:LINE(XS+2.YS+2)-(XS+2.YS+5 ) ,3:PRESET( XS, YS+2 ) :PRESET(XS,YS+5):R 

ETURN 

659 LINE(XS+2,YS)-(XS+5,YS+7).5.BF:LINE(XS+4,YS)-(XS+2、YS+2).9:LINE(XS+3、YS ) - (XS 

+5,YS+2).9:LINE(XS+4。YS+4)-(XS+4、YS+5) ,7: し LINE(XS,YS+1 )-(XS+1 YS+2).4:LINE(XS+7.Y 

S+1)-(XS+6.YS+2),4 

669 LINE(XS,YS+5)-(XS、YS+7) 4:LINE(XS+7.YS+5)-(XS+7.YS+7) 、4:PSET(XS+1 .YS+4).4:PS 

ET(XS+6,YS+4) ,4:PRESET(XS+2.YS+7 ) : PRESET (XS+5 ,YS+7 ) : RETURN 

679 LINE(XS,YS+2)-(XS+7,YS+5) ,5,BF:LINE(XS,YS+3) - (XS+2.YS+5) .9:LINE(XS,。YS+4)-(XS 

+2.YS+2),9:LINE(XS+4 YS+3)-(XS+5。YS+3) ,7:LINE(XS+ 1 .YS+7)-(XS+2.YS+6).4:LINE(XS+ 1 
s。 YS)-(XS+2.YS+1) 、4 

689 LINE(XS+5,。YS)-(XS+7,YS) ,4:LINE(XS+5.YS+7)-(XS+7.YS+7) ,4:PSET(XS+4.YS+1).4:PS 

ET(XS+4,。YS+6) , 4 :PRESET (XS+7 , YS+2) :PRESET (XS+7 、YS+5 ) :RETURN 

699 LINE(XS+2,YS)-(XS+5,YS+7) 5,BF: し LINE(XS+4.YS+7 )-(XS+2.YS+5).9:LINE(XS+3。YS+7 ) 

-(XS+5,YS+5) ,9:LINE(XS+3,。YS+2)-(XS+3,YS+3) ,7:LINE(XS.YS+6)-(XS+1.YS+5),.4:LINE(XS 
+6.YS+5)-(XS+7。YS+6) ,4 

799 LINE(XS,YS)-(XS,YS+2) 4:LINE(XS+7,YS)-(XS+7,YS+2 ) , 4:PSET(XS+ 1 , YS+3) .4:PSET(X 

S+6 .YS+3) , 4 :PRESET (XS+2 .YS) : PRESET (XS+5,YS) : RETURN _ 
719 LINE(XS,YS+2)-(XS+7,YS+5) 、5。BF:LINE(XS+5.YS+2 )-(XS+7 YS+4).9:LINE(XS+5 ,YS+5 ) 

-(XS+7。YS+3),9:LINE(XS+2。YS+4)-(XS+3,.YS+4) .7:LINE(XS+5,. YS+ 1 ) -(XS+6.YS) ,4:LINE(XS 
+5、YS+6)-(XS+6,YS+7 ) ,4 

729 LINE(XS,YS)-(XS+2.YS) ,4:LINE(XS、YS+7)-(XS+2.YS+7) ,4:PSET(XS+3、YS+1 ) ,4:PSET(X 

S+3.,YS+6 ) , 4:PRESET (XS, YS+2 ) : PRESET (XS , YS+5 ) : RETURN 

739 LINE(XS,YS)-(XS+2.YS+1).2.BF:LINE(XS+5、YS)-(XS+7.YS+1) 2.BF:LINE(XS+ 1.YS)-(X 

S+1,YS+1),9:LINE(XS+6,YS)-(XS+6.YS+1),.9:LINE(XS+1、YS+2)-(XS+5、YS+6) ,2:LINE(XS+4 。 

YS+4)-(XS+6.YS+6 ) ,2 

749 LINE(XS+3、YS+2)-(XS+6,YS+3) ,2、BF:LINE(XS+5,YS+2 )-(XS+6.YS+3) 9:LINE(XS,YS+4) 

- (XS,YS+5) ,2:LINE(XS+2.YS+7)-(XS+5,YS+7 ) ,2:PSET (XS+ 1 , YS+6 ) , 2: RETURN 

759 LINE(XS,YS+1)-(XS+1 YS+6) ,6,BF:LINE(XS+6,YS+1)-(XS+7.YS+6).6.BF:LINE(XS+2.YS 
) - (XS+5,.YS+7) ,6,BF:LINE(XS+3,YS+1 )-(XS+4.YS+6) ,7,BF:PSET(XS+2.YS+2) ,7:PRESET( XS 

YS+ 1 ) : PRESET ( XS, YS+6 ) : PRESET ( XS+7 、YS+1 ) : PRESET(XS+7 . YS+6 ) : RETURN 

769 LINE(XS+2.YS)-(XS+5.YS+1).6.BF:LINE(XS+1.YS+2)-(XS+6、YS+5),.6,BF:LINE(XS,YS+6 
)- (XS+7.YS+6),6:LINE(XS+3.YS+7)-(XS+4.YS+7) .4:LINE(XS+2.YS+2)-(XS+2.YS+3) .7:LINE 
(XS+2.YS)-(XS+1。YS+1) 9:LINE(XS+5,YS)-(XS+6.YS+1) .9:PSET (XS+3.YS+1 ) 7:RETURN 

779 LINE(XS, YS+1)-(XS.YS+3) .6:LINE(XS+7 .YS+1)-(XS+7.YS+3) 6:LINE(XS+ 1 .YS ) -( XS+6 。 

YS+7).6.BF:LINE(XS+1,YS+1)-(XS+1.YS+6).9:LINE(XS+6,YS+1)-(XS+6.YS+6).9:LINE(XS+4 
。YS+2)-(XS+4.YS+3) ,7 
789 PSET(XS+1 ,YS+4),6:PSET(XS+6,YS+4) ,6:PSET(XS+3、YS+4) ,7:PRESET (XS+2.YS):PRESET 
(XS+2.,YS+6 ) : PRESET(XS+5.YS) : PRESET (XS+5 , YS+6 ) : RETURN 

799 LINE(XS+1.YS+1)-(XS+2.YS+6).2、BF:LINE(XS+5 ,YS+ 1 )-(XS+6.YS+6) ,2.BF:LINE(XS+3。 

YS)-(XS+4,YS+7) ,2、BF:LINE(XS+5,YS+4)-(XS+5.YS+5) ,7:PSET(XS+4 ,YS+6 ) , 7 : PRESET( XS+ 1 
,YS+ 1 ) : PRESET(XS+ 1 ,YS+6 ) : PRESET (XS+6.YS+ 1 ) : PRESET (XS+6 、YS+6 ) : RETURN 

899 LINE(XS,YS+1)-(XS+1.YS+6) ,4.BF:LINE(XS+6.YS+1 )-(XS+7。YS+6).4.BF:LINE(XS+2.YS 
)-(XS+5,YS+7) 4.BF:LINE(XS+ 1 .YS+2)-(XS+6.YS+4) .7、BF:LINE(XS+2.YS+3)-(XS+2。YS+4 ) 、 

9:LINE(XS+5、YS+3)-(XS+5,YS+4),9 

819 PSET(XS+1.,YS+2) 4:PSET(XS+6,YS+2) ,4:PSET(XS+2.YS+5) ,7:PSET(XS+5 YS+5 ) ,7:PRES 

ET (XS,YS+1 ) : PRESET( XS, YS+6 ) : PRESET(XS+7 、YS+ 1 ) :PRESET(XS+7 YS+6):RETURN 

829 LINE(XS+3,YS)-(XS,YS+3) .6:LINE(XS,YS+4)-(XS+3.YS+7).6:LINE(XS+4、YS+7 )-(XS+7 。 

YS+4).6:LINE(XS+7、YS+3)-(XS+4.YS) ,6:LINE(XS+3.YS+ 1 )-(XS+1 、YS+3) .5:LINE(XS+ 1 .YS+4 
)-(XS+3.YS+6),5:LINE(XS+4,YS+6)-(XS+6、YS+4),5 

830 LINE(XS+6,YS+3)-(XS+4.YS+1),5:LINE(XS+3.YS+2)-(XS+2。YS+3) ,4:LINE(XS+2.YS+4 ) - 
(XS+3.YS+5).4:LINE(XS+4,YS+5)-(XS+5,YS+4),4:LINE(XS+5.YS+3)-(XS+4.YS+2).4:LINE(X 

S+3.YS+3)- (XS+4、YS+4 ) 、2.BF: RETURN 


編集 部 に は 、 変 わっ つた 人 が だ くさ ん いる ん だ けど 、 そ の 1 人 を 紹介 し レ しま ー す 。 ま ず あ の タバ スコ を 思い 出し て ほし い 。 あの び 


果 個 ろ ん に 半分 ぐら い 残っ て いた モツ タバ スコ を スト ロー で 飲め で し まつ だ と いう 人 が いる ん で す 。 さ あ そ れ は 誰 で し よう 


849 LINE(XS.YS)-(XS+7.YS+6) .2.BF:LINE(XS,YS+3)-(XS+7 .YS+3) .9:LINE(XS+6,YS)-(XS+6 
>YS+3).9:LINE(XS+2.YS+4 ) - (XS+2 、YS+6 ) ,. 9 : RETURN 

859 CLS 

869 FOR 1I=1 TO 7:COLOR 【I 

879 LOCATE 19.2:PRINT " 画 NZ kb 44 ズ ト 4 イト 画 ア 4 オト 男 男 ト 面 b 回 還 4 
- 王 較 "「: 

889 LOCATE 19.3:PRINT" 還 一 固 較 前 固 較 一 | 較 固 一 基 較 | | | 語 問 NN 較 四 | 四 幸 四 四 | 
ーm。 還 ": 

899 LOCATE 19.4:PRINT " 画 ヘア や アア 男 | 較 自 還 NB 人 代 四 パ | 固 較 固 固 四 4 回 ア アマ 
ーー 店 "ENEXT 


999 LOCATE 19.6:PRINT CHR$(&HFC:" ツ ーー CHARACTER 一 一 "| 

919 XS=5:YS=39:GOSUB 459:LOCATE 8.8:PRINT CHR$(8&HFE):"ー FOOT MACK":CHR も (8&HFB) : "< 
・ KEY ・・":CHR も (8&HFF) 1 "4 二 6" iCHR も (8&HFC):" (YOU) "iLOCATE 31.7:PRINT CHR$(&HFF ) : "8 
"LOCATE 31.9:PRINT CHR$(&HFF) 1 "2 75 

929 YS=42:GOSUB 539:LOCATE 8.11:PRINT CHR$(8&HFC):"ー SLUG" iCHR も (8&HFD):"・・・・・ CODE 
NAME ・・・・ "iCHR$S(&HFA) )"(RND) " 

939 YS=S4:GOSUB 619:LOCATE 8.14:PRINT CHR$(8&HFC):"ー SPIDER":CHR$( 8&HFD):"・・・ CODE 
NAME ・・・・・・ "CHR も (8&HFA) ET"(Y)": 

946 YS=66:GOSUB 659:LOCATE 8, 17: PRINT CHR$(&HFC)i"ー BEETLE" iCHR も (&HFD):"・・・ CODE 
NAME ・・・・・・ "3 CHR も (8&HFA)i "(CX)" 

959 YS=78:GOSUB 739:LOCATE 8, 29 : PRINT CHR$(&HFC) "リー SCORPION" iCHR も (8&HFD):"・ CODE 
NAME ・":CHR$(&HFA):" (WARPER ) " : 

969 LOCATE 59.6:PRINT CHR$(&HFE):"ーー TREASURE 一 一 "|: 


979 XS=96:YS=39:GOSUB 759:LOCATE 52.8:PRINT CHR$(&HFE)j"ー COIN":CHR も (8&HFF) :" 
・" iCHR$S(&HFC): "199 ptS.": 
989 YS=42:GOSUB 769:LOCATE 52,11:PRINT CHR$(&HFE) :"ー BELL":CHR も (8HFF) "ーーー・・・・ 時 
CHR$(&HFC): "299 ptS.": 
999 YS=S54:GOSUB 779:LOCATE 52,14:PRINT CHR$(&HFE):"ー CUP" iCHR$(&HFF) 1 リーーーーーー・・ 2 
CHR$(&HFC): "399 ptS.": 
1999 YS=66:GOSUB 799:LOCATE 52.17:PRINT CHR$(&HFE):"ー RUBY":CHR も (&HFF) エリ ーーーーーー・ 
iCHR$(&HFC): "499 ptS.": 
1919 YS=78:GOSUB 899:LOCATE 52.29:PRINT CHR$(&HFC):"ー SCULL" iCHRS(&HFD) "ーーー " 
iCHR$(&HFA) "OUT 11": 
1929 COLOR INT(RND( 1)*7+1):LOCATE 11.23:PRINTTP USH [RETURN] KEY T 
0 GAME ST AR T !"i:SOUND 82.2 
1939 FOR I=9 TO 199:IF INKEY$ く >CHR$( 13 ) THEN NEXT:GOTO 1929 ELSE RETURN 
1949 XS=Xw8:YS=Yx8+2:LINE(XS,YS) -(XS+7 YS+7 ) ,9,BF:GOSUB 829 
1959 FOR J=19 TO 159 STEP 19:CIRCLE(Xx8+4,Yx8+6) ,J,INT(RND( 1 )x7+1) :SOUND 82.2:NE 
XT 
1969 CLS:LOCATE 15.6:PRINT CHR$(&HFA):"SECRET TREASURE'S POWE 
R "iLOCATE 39,19:PRINT CHR$(&HFE):"B ONUS ": 
1979 FOR I=9 TO 2099 STEP 19:LOCATE 42.19:PRINT CHR$(&HFB) : :PRINT USING " 柱 杜 社 "1 
is:SOUND 82.3:NEXT 
1989 S=S+2999:FOR I=9 TO 19:COLOR INT(RND( 1)x7+1):LOCATE 18.17:PRINT"ーー CON 
GRATULATIONS ! 一"::NEXT 
1999 LOCATE 25,29:PRINT CHR$(&HFF):"R 0UND CLE A R":i:FOR I=9 TO 1999:NEXT: 
GOTO 59@ 


1199 CLS:LOCATE 13.3:COLOR INT(RND(1)x7+1):PRINT" オ RA 。 4 オト は kk4 画 と 四 パ 
AM 4 画 画 Mi:LOCATE 13.4:PRINT" 還 mn 画 - 較 画 較 画 - 8 | 四 上  | 
「 題 昌 "2:LOCATE 13.5:PRINT" ペ アア 回 回 回 回 回 アア 置 還 AP": 


1119 IF S>H THEN H=S 

1129 LOCATE 22.7:PRINT CHR$(&HFE):"Y OUR SC OR E"i:PRINT CHR$(&HFC)::FOR 1 
=9 TO S STEP 19:LOCATE 46.7:PRINT USING" 柏 社 林 提 提 基 佑 " 1 :SOUND 79,2:NEXT 

1139 LOCATE 22,.19:PRINT CHR$(&HFF):"H I GH S CO R E"i:PRINT CHR$(&HF9)::FOR 
1=9 TO H STEP 19:LOCATE 46,19:PRINT USING" 林間 提 韻 半 ": 1 :SOUND 79,2:NEXT 

1149 IF S=H AND S<>9 THEN FOR I=9 TO 29:COLOR INT(RND( 1)x7+1) :LOCATE 1.13:PRINT" 


ーーCONGRATULATIONS! Y0U MADE HIGH SCOR E ーー 
NEXT 
1159 LOCATE 9.16:PRINT CHR$(&HFB) :"@ ORIGINAL PROGRAM NUMBER 19 @":" "iCHR も 


(&HFF):"O PROGRAMMING BY MIO O": 

1169 COLOR INT(RND( 1 )x7+1):LOCATE 19.23:PRINT" PUSH [RETURN] KEY 

TO NEXT STAR T !"i:SOUND 89.,2 

1179 FOR !I=@ TO 199:IF INKEY$=CHR$( 13) THEN 39 ELSE NEXT:GOTO 1169 

1189 X2=INT(RND( 1 ) 3-1) :Y2=INT(RND( 1 )*3-1):1F DA(MX(B)+X2.MY(B)+Y2)=1 OR DA(MX(B 
)+X2.MY(B)+Y2)=7 OR X2+Y2=9 THEN 1189 ELSE IF X2=-1 THEN F(B)=1 ELSE IF X2=1 THE 

N F(B)=4 ELSE IF Y2=1 THEN F(B)=3 ELSE F(B)=2 

1196 RETURN 

1299 IF X=MX(B) THEN X2=6@: Y2= (Y く MY(B) )-(Y>MY(B) ) ELSE 1229 

1219 IF DA(MX(B)+X2.MY(B)+Y2) く >1 AND DA(MX(B)+X2,MY(B)+Y2)<>7 THEN 1239 

1229 X2=INT(RND( 1 ) *3- 1 ) :Y2=INT(RND( 1)x3-1):IF DA(MX(B)+X2.MY(B)+Y2)=1 OR DA(MX(B 
)+X2。MY(B)+Y2)=7 OR X2+Y2=9@ THEN 1229 

1236 IF X2=-1 THEN F(B)=2 ELSE IF X2=】 THENM F(B)=4 ELSE IF Y2=1 THEN F(B)=3 ELSE 
F(B) =1 

1249 RETURN 

1256 IF MY(B)=Y THEN Y2=@:X2=(X く <MX(B) : (X>MX(B) ) ELSE 1279 

1266 IF DA(MX(B)+X2.MY(B)+Y2) く >1 AND DA MX(B)+X2.MY(B)+Y2) く <>7 THEN 1289 

1279 X2=INT(RND( 1 ) *3- 1 ) :Y2=INT(RND( 1 ) 3- 1):IF DA(MX(B)+X2.MY(B)+Y2)=1 OR DA(MX(B 
)+X2.MY(B)+Y2)=7 OR X2+Y2=9 THEN 1279 

1289 IF X2=-1 THEN F(B)=2 ELSE IF X2=1 THEN F(B)=4 ELSE IF Y2=1 THEN F(B)=3 ELSE 
F(B)=1 

1299 RETURN 


1399 X2=INTIRND( 1 )*18+1):Y2=INT(RND(1)x19+1):IF DA(X2,Y2)=1 OR DA(X2.Y2)=7 THEN 
1399 ELSE RETURN 

131@ DATA 1, 生生 1。1.1、1。1.1.1.1.1.1.1。1.1.1 1 1、1.9.9.9.9.9.9,9,9.9.9.9.9,9,9, 
9,9,9.9,1.1.9,1.9,1.9.1.9,1.9、1.9、1.9,1.9,1.9,1 1 1.9,9.9.9.9.9.9.9.9,9.9.9.9,0, 
9.9.9.9,1 

1329 DATA 1,.1.9,.1.9,1.9,1.9,1.9,1.9,1.9.1.9,1.9,1 1.9.9.9.9,1.9.9,9.9,9,1.9,9.9。 
9.9,1.9,1,1.9,1.9,.9.9.9.9,1.9.9.9.9.9,.1,.9.9.9,9,1 1.9,1.9,1.9,1.9,1.9,1.9,1.0,1, 
9,1.9,1,1 

1339 DATA 1.9.9.9,.9,9,9,.9,9,9.9.9.9.9.9.9.9.9,9,1,1,1.9,1.9,1.9,1.9,1.9,1.9,1、9。 
1.9,1.9,1,1.9.9.9.9.9,9.9,.9.9,.9.9,.9.9.9.9,.9.9.9。1,1。1,.1。1.1,。1。1.1。1,1。1.1。1,1。1,。 
1.1、1。1.1 

1349 DATA 1,1,.1.1.1.1.1。1、1.1.1、1.1.1.1.1.1 1,1,1、1.9.9.9,1.9.9,9.9,1,1.9,9.9,9, 
1.9.9.9,1,1,1,1.9.9.9,1.1.9.1.1.9.1 1.9.9.9,1,1,1,1.9,1.9,1.9.9,9,9,1,1.9.9,9,9, 
1.9,1,.9,1 

1359 DATA 1.9,1、9、1.9,1.1.9.9.9.9,1.1.9.1.9,1.9、1 1.9.9,9,1.9,1,1.9,1,1.9.1,1.9。 
1:9,9.9,1,1.9.9,9.1.9,1,1.9,1,1.9,1.1.9,1.9.9.9,1,1.9.1.9,1.9,1,1.9.9.9.9,1。1.9, 
1.9、 1 .9,1 

1369 DATA 1.9,1.9、1,.9.9.9.9,1,1.9.9.9.9,1.9,1.9、1,1,1,1,.9.9.9,1,1.9,1,1.9,1,1.9。 
9.9.1.1,1,1.9.9.9.1.9,9,9,9,1,1.9.9.9.9,1.9.9.9,1,1,1.1.1、1.1,1.1.1.1.1,1.1,1,1。 
1.1.1,1 1 

1379 DATA 1.1. 11 1.1.1.1.1。1。1。1.1、1.1.1.1.1。1、1 1.9.9.9.9.9.9,.9.9.9.9.9,9.9.9, 
9.9.9,9,1,1.9,1。1 1.1.1。1,1.1.1。1.1、1、1.1.1.1.9,1.1.9.9.9.9,.0.9.9,.9,9.9.9.9.9,9. 
9.9.9.9,1 

1389 DATA 1.9,1,1.1.1.1。1。1.1.1。1.1.1、1,1.1,1.9,1.1.9,1.9.9.9.9.9.9.9,9,.9.9.9,9。 
9.9.9.9.1.1.9.9.9.9.9,.9.9.9.9.9.9,9.9.9.9.9.1.9,1,1.9、1.1、1.1.1.1,1.1,1,1,1.1,1.。 
1 .1 1.9,1 

1399 DATA 1.9.9.9.9.9.9.9.9.9、9.9.9、9.9.9.9.9.9、1,1.9,1,1,1.1.1。1.1,1,1.1,1,1。1。 
1,1.1.9,1.1.9.9.9,.9.9.9,.9.9.9.9.9.9.9.9.9.9.9.9.1,1.1.1,1,1,11,。1.1,1、1,1。1。1,1。 
1,1,1.1,1 

1499 DATA 1.1.1.1.1、1、1.1.1.1.1.1.1.1。1.1,1,1.1 1.1.9.9,9,.9.9.9.9.9.9.9、9,9.9,.9, 
9.9.9.9,1,1.9.9.9.9.9.9.9.9.9.9,9.9.0.9.9.9.9,9,1、1.9.9,.9,9.9.9,.9.9.9.9.9,9.0,0, 
9.9.9。9,1 和 き 

1419 DATA 1.9.9.9.9.9,9,9.9.9.9.9.9.9.9,.9.9.9.9,1 1.9.9.9.9.9.9.9.9,1,1.9,9.9。9, 
9.9.9.9,1.1.9.9,.9,9.9.9.9.9,1,1.9、9.9.9,9.9.9.9,1,1,9.9,9.9,9.9.9.9.9.9,9,9.0,0, 
9.9.9,.9,1 

1429 DATA 1,.9,9.0.0、9.9,9,.9.9、9.9.9.9、9.9.9、9,9,1,1.9.9,9,9.9,9.9.9.9.9.0.9.9.0。 
9.9.9.9.1.1.9.9.9.9.9.9.9.9.9.9,.9.9.9.9.9.9.9.9,1,1.1.1,1.1.1、1、1.1.1,1.1.1,1,1。 
21 。1 1 

1439 FOR !=9 TO 5:FOR J=1 TO 4:LINE(Xx8.Yw842)-(Xw8+7,Yw8+9),9,BF:XS=Xw8:YS=Yw8+ 
2:ON J GOSUB 450.479.499.519:SOUND 82-J,2:NEXT: NEXT 

1449 M=M-1:RETURN 


か ツェ ッ 
850~-1030 オー プ ニ ン グ デ モ 
1040~1090 スペ シャ ル ボ ー 
「 ス サ ブ ルー チ シ 
1100-1170 ゲー ム オ ー バ ー 
1180-1300 モン スマ ー の 種類 
に よる 移動 方 向 決 
定 サ ブル ー チ ン 
1310-1420 画面 迷路 デー タ 
1430-1440 フッ トマ ッ フ が や 
られ だ 時 の 処理 
田 チ ェ エッ フ ボ イン ト 
ハン ディ キヤ ッ プ を 乗り 込 え 
よこ く ぞ ここ まで や つて これ 


まし だ 。 と は いえ 、 ち よ つ と キ 
ー ス キャ ヤン が 悪い ね 。220 行 OU 
「 48, 1 クノ 以下 を 次 の よ . 
うに 変え よう 。K 1 三 I NP(4 
0 MI 8 クン 5 
K ジ =I NP (49) : KK 


1 AND 


KK ご ね で だ い 


ぶ 動 き が 改良 され る よ 。 ま だ ゲ 
ー ム 中 に は や は り 難 種 数 値 が 見 
だ いよ ね 。 ス コア 表示 は 、 ご この 


ゲー ハム で は 、 


最後 に こつ だ 形 で 


表示 され る の で 、 残 つて いる フ 
ツ ト マ ッ グ こと 取 つ だ 宝 の 数 を 表 
示さ せる こと に し よう 。 次 の 行 
を 加え れ ば ひ OK だ 。 

の 5 60 し 6 月 ルル 6 
CATE3 の , 23:PRIN 
1 USING FOOT 


MACK 


U り ST NG 


#” :M:LOCA 
由 革 | の ) 


3 PtU IN 下 
^「REASUR 


。 寺 の 5 

365 LOCATE 68 

だ 3: ビ 尽 INT SS 

まだ 、 ご の プロ グラ ム で は 面 
ご ンス ター を ラン ダ /) で 購 ん 
で いる ん だ けど 、 簡 単 な 面 お ら 、 
面 を ツリ ア す る だ びに だ ん だ ん 
お ざ ガ し い 面 に し て いく ぐ よ うに 
し レ し だ ほう が よ が つ だ の で は な い 


ガ な 。 Cee) 


※ ご の ゲー ム へ は PASOPIAZ 
で お も 二分 あ そ べ る けれ ど 、 ルビ 


5 が と 


スラ ツ グ の キャ ヤラ 


タダ タ が ちよ つと だ け 変 わ つ て し 
のみ 0 で その うつ やり で て 。 


3 ミエ ッ ト ー 4 め ゆみ は いろ ん な も の を 落と す 子 な の で す 。 ヨ ッ ト バ ー カ ー か ら は じ ま つ て 、 お べ ん と う 、 教科書 、 指 輪 に 時 計 。 き わ め つけ は 、 22 


な ん と けん いん な の だ 。 わ か が つ だ や あっ つ 品 に し ちゃ だ め 。 な いし よ な い し よ 、 な いし よ の 話 だ よ 。 


ンク レン ュ ッ ノ /=/@ ニ ルッ ソー/ / 


十字 和 よ け て 女の子 の 生き 血 を / 


SCORE 1 ピ 98 HRN 3 DRYV 1 


4^ 家 に だ ご りつ け ば も うつ ドラ キュ ユラ の 天下 。 1 面 フ リ 
ア し て 、 次 の 面 へ 進む の だ 。 


4 牧師 に 追わ れる ドラ キ コ ユラ 、 危 機 一 髪 | キー で 上 左右 に 動か す の だ 。 
と この て 、 の の な が に 1 炎 だ びり 
さっ の 形 を し だ キャ ラク タ ) に 帰っ て いこ 自 い 服装 の 女の子 が いる ん だ けど 、 こ 
遊び 万 2 が に だ と りう の くだ びに 、 右 クリア れ は 襲う と や ば い 。 実 は 、 牧 師 が 変装 

いろ ん な ギャ ラク が 中 て き で て 、。 ち うち だ 。 廊 の 務 は 同人 腸 っ て も いい 。 1 人 CU あの 

ょ っ と まぎらわしい けど 、 キ ミ が 操作 租 う た びに 、100 点 XDAY (日 数 ) が ちゃ ん と し た 女の子 は 資 色 い 服 を 着 
する の は ドラ キュ ラ (人 の 形 で 何 も 持 侍 点 と な る の だ 。 て る か ら よ く 見 て 襲い か か ろう 。 ウ ム 
っ て な いも の )。 あちこち で 立ち すく ん だ だ し 。 ドラキュラ だ か ら 、 細 はい $ ム 、 な ん だ か ドラキュラ を 応援 し て る 
で いる 女の子 (スカ ー ト を は いて る よ ) の が 2 つ あ る 。 1 つ は 十字 架 。 画 面 に と アク グマ に な っ よう な 気 人 の が す る な 。 


を 次 々 に 襲っ て 、 ド ラキ ュ ラ の 館 ( 家 敢 ら ば っ て いる 十字 架 や 、 十 字 和 架 を 手 
に 持っ て 追い か け て 〈 4 牧師 に つか ま 


SCORE 9S8 4RN 3 DRYV 1 


有朋 時 還 時 明 計 朋 時 見 皿 】 
1 ま の 生 国 な 気 ま を 上 の - 2 だ ら や 540 て し まう の だ まだ 、 画 
sm を 送 の 士 い を だ も 中 コ ョ m 面 の 上 を 刻々 と 移動 し て いる 月 が 沈ん 
m 出 る て で 無 埼 出 ま う 学 ン 邊 ノコ リ タイ < 29 
1 し の 、 宙 玉 し だ 人 才 条 1 で し ま っ て も アウト 。3 人 、 ド ラキ ュ Day 1 
は ロ ー 3 ト 目 0 29 * 1 *499 
1 年 勉 。 の て 店 WW 04060 の 0) だ 。 BONUS 2399 
を た に ーー た 1 で も 、^P” を 取る と 5 秒間 くら い ド 
よ き 
3 』 る あ の - 20NKO2RE ドラ キュ ラ 
ョ 送 思 の > ! に な 夫 字 打 で も 牧師 で も 全然 平 
まま: 4 まっ メ い 0 追い つめ られ を そう に な っ た 
本 幸 バ 1 いら P を 取っ て 反撃 し よう 。 4 面 フ リア の だ びに 日 数 が だ つて いき 、 
座 の 8 は 真 - お っ と 、 ド ラキ ュ ラ は 、 カ ー ソ ル ・ ボー ナス が どん どん 高く な る ぞ 。 
9 9 
ll 月 本  W MM M IM IM IM IM 8 HI BI M っ 


66 テット /9 5 叶 の ポシェ ッ ト 部 隊 で 、 い つ ち ゃ ん ひん し ゆく を か つ だ の は 、 実 は まけ ちゃ ん で は な く ぐ 、 バ パンプ だ つ だ の だ 。 い か に バン ブ 
提 右 9/ が 完璧 に みん な の ひん し ゅ こく を か つ だ か 、 こ こ に レポ ー ト し よー (つづ く )〉 


10_ REN DORAKYURA _ Ver 2.O 
20O REM 1984.8.1 マ 

さ O_ REM BY YOSHITO ASABA 

40 REM Y。 人 4. 

290 REM HG NE 


10O 
110 
115 
1 で 
14O 
15O 
160 
1 7 
> 
180) 
1 9 
191 
ダ 〇 ① 〇 ) 
マ 210 
220 
ダダ 1 
マ さ 0 
マ 4 〇 
2 ら 5O 
ご ら 6 
マ ア 0 
ご 日 ひ 
“90 
ささ OO 
さら 
さき 10 
さ 2 〇 
さ ダ 1 
さ ス ウフ 
さる さ 
ささ ひ 
さ 4QO 
さら 0 
さき 6 ひ 
さら 65 
さき 7 
さ O 
さき 0 
4OO) 
人 410 
419 
42O 
4 ジ 5 
4 る 〇 
人 4 うら 
人 40 
445 
人 45O 
但 1 
人 4 
人 46 〇 
465 
し 49) 
人 47 ら 5 
人 40 
4 コロ 2 
4 
生日 6 
紀 QQO 
50) 1 
1 0 
ら 26⑩) 
ら 4 の 
つら O 
らら 60) 
アウ 
5 の 
ら 60O 
610 
ら 62 の 
6 る 〇 
646 
ら 6 ら 50) 
651 
66 
ら 67Q 
68O 
6 の 0 
フロ 
710 
ノロ 
/ ダ 1 
あら が 
の 
40 
75 
OO 
81O 
81 1 
BSO 
B さ O 
4O 
84 1 
85O 
B6 ひ 


ジェッ 


ーー 


家人 9 


H=20000』 RANDDMI ZE: CDLUR 7。O。OiCLS:PORE O。OsFICE P 
人 ま (O) "Os も (1)= リ "人 (2)= リ X"sBDSUB 6OO 

PICK FiLOCATE 55。10:PRINT "HIT ANY EEY TUD START !!":IF P=O THEN 115 

N=- 1 : G=Os PFM=O: MM= エ :R=1 = =O: TEMPO 5O 

PURE ま CAOO。 Os CLS: BUSUB 5OOs GUSUE 55o 

COLUR 6。』O。1:X1=INT (RND ( 〇 ) % つ 9+1 ) : X つ =INT (RND (O) %19+ さ ) LUDCATE X1。X2PRINT " " 
=TNT (RND ( 〇 ) %* づ 9+ 1 ) : =INT (RND ( 〇 ) *19+ る ) : じ =INT (RND ( 〇 ) ※ つ 9+1 ) : D=INT (RND (O) * 19+3) 
COLOR 7。O、1 

LUCATE BsFRINT "の ュ ュ SDUND 200。S4sLDCATE C。DsPRINT "7 ュ iSDUND 200。24 

FOR 1=O TD 60*R:LUCATE INT(RND(O) *29+1) 。INT (RND (O) *19+ さ ) PRINT "" ョ ENEXT 
COLUR 6:FOR 1I=1 TO 2*R 

LOCATE INT(RND (O) *29+1 ) 。 INT (RND (O) *19+ ミ ) sPRINT "も"』sNEXT 

FUR 1=O TU 4*RsLUCATE INT(RND(O) 29+1 ) 。TNT (RND (O) *19+ さ ) =PRTNT " 昔 " り ssNEXT 
E=TINT (RND(O) *29+1 ) :F=INT (RND (O) *19+3) :LUCATE EE。FgPRINT " 音 "s 

CDLOR 7。O。O 

X=INT (RND (Q) *29+1 ) : Y=INT(RND(O) *19+ さ ) sLUCATE Xー1』YiPRINT " "iiSDUND 161.24 
FDR 1=20O TU BOO STEP 50:SOUUND 1。5:SDUND 1-5O。 呈 :NEXT 

REM * ボ ※ ネ ボネ MAIN ポ 素 玉 玉 

IF T>3O THEN PUREE ま CAOO。6: LUCATE O。O:CODLDR 7。6。 さ ミュ BDTD 65O 

FICE PsIF P=O THEN ミ 05 

IF P= ま 1C AND NODT X>2 コ 9 THEN ソ =1:Z=OsGDTO さ 10 

IF P= ま 1D AND NODT X<2 THEN ソ =ー1』Z=Os BODTD ミ 10 

IF = ま 1E QAND NOT Y<4 THEN Z=ー1』 ソ =Os GODTU 1O 

IF P=$1F AND NDT Y>21 THEN Z=+1:V=OsBDTOD ミ 1O 

=Oi Z=O 


COULOR 7。0。OsLUCATE X。 YiPRINT " " ョ sa X= ニ X+ り 』 Y=Y+Z 


ロ =PEEK ド ( じ 10OD キ X+Y% ユ 2) 

ITF = あう THEN =5+100*R: SHUND 3 さ OO。 4: SOUND 200。 4: GOUSUB 呈 7O 

IF X=X1 AND Y=X2 THEN BOO 

COLUDR 6。0。1sgLOCATE X1。X2sFRINT " " 

IF _PMEO _ THEN FM=PM-1: SDUND さ OOO。 1 BUTD ミ 70 

IF 0= ま 4 THEN FM=2O:FOR 1】=2OO TU BOO STEP 5O: SdUND 1 。1: SDUND T+5O。 1 : NEXT 
TF ロリ = ニ まま 29 THEN RENM 

IF = THEN 650O 

ITF X=E AND Y=F THEN 650 


COULOR 7。0。1sLUCATE E。FEPRINT " 得 "agEOLDR 1. の 9。1sLUCATE X。YsPREINT "0" の s 
は =INT(RND(O)%2) =TF =O_ THEN SDUND 100。1:SUDUND 150。 1 
COULUR 7。0。OgiLUCATE T。1sFPRINT "igCEHLUR 6。O。1:T=T+NgLOCATE 了 T。1:FPRINT の リョ 


RENM ポポ BUHREUSHT 水玉 率 ※※ 

COULOUR 7。0。0gG=INT(RND(O) *2+1) iDN ロ GUTO 420。460 

RENM % 率 氷 率 HUELUGHT ポ 素 束 率 ポ 

LOUCATE 。BsPRINT " "agTF XN THEN Q=Q+1 

TF YSB THEN = ロー1 

TF X ぶ 全 THEN 人 = ニー1 

IF YEB THEN 日 =H+1 

IF FM:EO_ ND PEEK (まじ 100++B ネ さ 2) = 和 ま 1 THEN 人 =INT(RND (O) つづ 9+ 1 ) : ロニ INT (RND ( 〇 ) * 19+) 
COLOR 7。0。1 sgLOCATE AaBiFRINT "7 EEDLDR 7。0。O 

IF PFPM=O AND X= 人 Q AND Y=H THEN 650 

BUTO SS5O 

RENM 氷水 ※※ BUKUGH 1 ポ ※ 水 束 束 

LUCATE C。DgiFRINT リリ agiETF XSC THEN = ビ +1 : GOTOD 480 

IF YSD THEN D=D-1 

ITF X ぶ C THEN ビ = ビ ー1 

IF YED THEN D=D+1 

IF_ FMEO_ AND FEEE (まじ 100+ ビ +D* そ 2 の) = 事 1 THEN ビ =INT(RND (O) *29+1 ) =D=TNT (RND (O) * 19+ さ ) 
COULOUR 7。0。1 iLOCATE C。DiPRINT "7 ggEOLHR 7 プ 。O。 0 

IF _PM=O_ AND X=C AND Y=D THEN 65O 

GOTOU 25O 

REN ボ 率 水 氷 ※ は RMEN ボボ 涼 ※ 

FUR IT=O_ TU ミ 1sLUCATE 1。2:FRINT " 較 "i:LUCATE [。2 さ EPRINT " 國 "::NEXT 

FOUR I=S TO SSsLOCATE OQ。TiPRINT " 略 "::LOCATE さ 1。ITiFRINT " 議 "』:NEXT 

RETURN 

REINM 水素 ポポ コロ じ PRT ボボ 素 率 

LOUCATE_ O。OgiFRINT "SCORE "iLOCATE 12。OgFRINT "MAQN" LHCATE 19。OsFRINT "DaY" 
LUCATE 15。OgFRINT MsiLUCATE 2 ミ 。 OFPRINT KR 

LOCATE 弓 。OgFRINT GRETURN 

RENM 素 氷 束 ※ ボ DAQT 人 NR 素 氷 氷 束 ボ 

FOUR = まじ COOO_ TU ま COSF READ Z ま saFOFEE エ 。 VAL ("まり +Z ま も ) :NEXT:RETURN 


DaTa 1 コミ C 。 フロ 。 す 和 † 。 ブフ 呈 。 プ 。 7 。 7 己 ュ つ 日 。 3 日 。 ワ タキ 。 日 。 日 。 2 日 。 6C 
DRTA うう で ラフ ワイ 己 さり 0。 さ O。 2 日 。 6C ・ 5 日 。 日 。10。f イ 己 。 さ 日 。 7c 。 2 日 。 2 
DATA す C。 す 己 。B で 。 陸 己 。「 こ 。 己 けり 。 けり s18。18。 イ す 。 イ す 。 1B。 1 日 。 1 日 。 1 日 
DAaTA BB1 42 1 。a4。 518. 42 。B1 ュ ら 0。 さけ 。 1 に 。 1 て 。1C。 1 日 、 そ OO。 60 


RENM 炒 束 氷 ※ ポ 15GO ボ 素 ※※※ 


FOR 1!=BOO_ TOD 2OO_ STEP -55Oi SUUND 4:SOUND すら 5 。 介 


CDLDR フ 。O。OsVZ=TNT (RND (O) * さ ) :LUCATE X。Y:PRTINT 人 Q ま (VZ) 』sNEXT 
COLOR 1、O。1:LUCATE X、YsPRINT "sgCODLOR 7。0。OESDUND OO、4: SDUND ミ OQO、4 
LUCATE X』YsFRINT " "』:M=Mー1 : PPMW=O GDSUE 560 

IF M=O THEN 72O 

CELS: T=Oi CDLDR フ 。0。 OBDTD 14O 

REM ボボ ポポ RME OUVER * ボ ポポ ※ 

LUCATE 11。1OsFRINT "BAME DUVER": 

IF S:H THEN H=S:LODCATE 11。12iFPRTINT "YOUR SCOURE 1 HIGH" 3 : BEEF :BEEF :EBEEP 
LUCATE B。14:FRINT "TRY ABAIN つ (YZN) "FICF P 

IF F= 和 ま 79 THEN 12O 

IF FFP= 和 も 6E THEN CLS:PUFE O。 ま 40:CDLDUR 7。O。OiPOEE ま CAOO。 OiEND 

BUTO 722 

REM * ポ ボボ MQN CLEAR ボボ 束 束 

FOUR 1= ミ TUD 21:LOCATE 1。IiPRINT SFC( ミ O) 』:NEXT 

T1=INT (32ーT) :LDCATE 10。6:FRINT "フウ コリ 9 イム リョ T1 

LOCATE 10。BgFRINT "DAY"sRsLDCATE 10。10gFRINT T135 "の "iR の り sa "1OO"s 
BOD=T1*RW1OOgLDCATE 1O。12kFRINT "BONUB "』BOzFUR IT=O TO 2000:NEXT 

FUR 1=BD-5O TU O GTEF -550:G=S+50: GODSUE 57Qs SDUND 700。1: SOUND 75oO。 1 
LOCATE 15。12:iPRINT TkNEXT 

FDR 1=Z00 TO ミ Q0O_ STEF_-5O: SDUND !、4:NEXT :FDR IT=O TO 1OOO: NEXT 

PL FM=O ェ iR=R+1 : 本 =O』 N=N+。 1 : BUTD 140 


で 、 ま つ だ ぐ プ ログ ラム 、 お よび 原稿 に ま を つけ な か つ だ の で ある 。 


一変 数 リス ト 


HH YO ハ \ イ 


PW ryoe ド 


スコ ア 

ドラ キュ ユラ が や られ 
だ と き の キ ャ ラク タタ 
ア 
ラキ ユラ の パワ ー ア 


ツ プ 時 間 


M Eee ドラ 
eie2s 月 の 


AB.CD・ 


XX の ドラ 
も cas ドラ 


キ ユ ラ の 数 
沈む 時 間 

… 牧 師 の 座標 
キュ ユラ の XX 座標 
キュ ユラ の YY 座標 


田 プ ロブ ラム の 説明 


100-140 
150 一 230 
240~390 
400 一 460 
500~520 
540 一 570 
590</00 


710 一 750 
600 一 660 


初期 設定 

初期 画面 設定 
ドラ キ ユ ラ 秘 動 
牧師 移動 

画面 表示 
スコ ア 表 示 
牧師 に つか まつ だ と 
き の 判 断 

の 2 
面 プ リア 


一 チェ ッ フ ボ ポイント 


に この プー 


し いと いう 
を 変え て 、 
増やし て ぐ 


ム が だ い へ ん むず か 
人 は 、120 行 の M=3 
ドラ キ ユ ラ の 人 数 を 
だ さい 。 


まだ 、 す ぐに 面 ク リア し て し 
まう つよ うな 人 は 、 同 じ ぐ 120 行 の 
N=. 1 を 大 きぐ する と 、TIM 
E ガ 短く な り 、 お むず か し ぐ な り 
ます 。 (エイ キチ ) 


(ひん し ゅ ぐ そ の 1 ) バン プ は 、 本 読 が いそ ガザ レー か ら と いう 理由 で 、( 実 は 、KURO と Hi-Score を 争 そ っ て いた 。) 火 切 ま 6 7 


ヾ 1 
に lu 
テバ 


姿 0g-/"@ ググ ググ ク グ ググ 


す 


PROGRRH bg 「.M 
CHRRHRCTER Bag 5,. 加 


も 7 ら 4 
PUSH TYPE に 


ん 


-4 ム ヌー と 、K は どこ だ つ だ か な 。 確か 
ご の へ ん 、 わ つ 、 あ せつ て 見 つか が ら な 


パソ コン の キー ボー ド は 、 英 文 タ イ 
プラ イタ ー と ほとん と 同じ 。 長 い プ ブロ 
グラ ム を 打ち こむ と き に 、 文 字 を 探し 
な が ら 、 ふ と 「 や っ ぱり タイ プ の 練習 
し 下 先 ゆい だ は ほう が いい が だ) な ん て 思 
っ だ こと が 何 度 か ある ん じゃ な い ? 

確か に 、 ノ パチ パチ ッ と すばやく タイ 
フ ヵ オヨ オ ] て れ ば 、 ず いぶ ん 打ち 込み の ス 
ビード も アッ プ す る は ず 。 

で 、 む か し か ら 、 タ イフ 練習 用 の ソ 
クト っ て 多かっ だ ん だ よね わ 。 AA か 6 ら Z 


TI II IN M 1 1 1 IE I 8 IE 5 W 2 


「」 ao " 守 ナチ で @ 
か 6 ) # と すき 
ん 本 全便 る) 
1 の 当 2 2 県 ん 虹 5 
7 人 ま 。 生 且 り を 1 
1 アン 60 わ ゎ 少 買 
で ア 開 に か し っ - 
まま と に い | りや て 
mW 出 困 て | まっ 1 
3 すれ | | える 半 和 
Hm まま せま UE 1 
m せ ん せ Mr - 
= ん ん ン 。 。 
| | 2 ポ 料 す 8 
まれ スル 
6 』 


ご く 楽 し い タイ プ 講習 ソ フト 


まで 打 た せ て お いて 、「 何 秒 か か り ま し 
だ りり ろ て 表示 し て で く 粉 る や つ 。 て も 。 
プログ ラム は 人 簡単 て すむ ひし 、 あ まり に 
も ゎぁ 似 た よう な の が 多い の で 、 き さす が に 
採用 きれ る こと は な か っ だ の だ 。 

だ の し が し 。 この "IN PE RUN= 
NING′ は 思わ すず 採 用 。 基 本 的 に は タ 
イプ 練習 な ん だ けど 、 そ れれ プラ ス 、 ラ 
シン シテ ニン グ の グラ ブ ィ ッ ク を 合 り て くれ 
だ た のり に 。 

画面 の "PUSH TYPE” の 横 に 出 て 
文字 を す は や く タ オプ し て 、 シ シン 
ナー を 前 へ 進ま せよ う 、 と いう も の 。 
文学 下 し てく 打ち 送 む だ ひび に 、 ラ シナ 
ー は 1 メー トル 進み 、100 メ ー ト ル 走 破 
の タイ ム を 競う ゲー ム だ 。 途 中 の 矢印 
は 20 メ ー ト ル ご と の 日 印 。 

最初 は 、A 一 ZZ ま て 順に 3 回 繰り 返 


つう だ 、 に り ル 2 | 


タダ イブ 練習 が こ 


すけ れ ど 、78 メ ー ト ル を すぎ る と 突然 
ラン ダム に な る の で 画面 に 注意 。 こ こ 
か ら 実 力 の 差 が 歴然 し し て くる ぞ 。 
UIHMEB が 0 に な つっ だ ら りら ゲ ー ム オー バ 
。 放 イ ブ プ に 居れ て な い 人 は 、100 メ ー 
トル 走破 を 目指 し て が ん ば ろう / 


PUSH TYPE 品 


炊 


Am は トク フイ な ん だ 。 すぐ と な り に n 
も ある し 。 な ん て いつ て る と 、 ま ず 走 
破 す る の は 難し いで し よ つ ね 。 


ん な に お も し ろ い な ん て ! 


人 0 mn た 人 な な ら 、 な ん で も な い だ ろ うけ ど 、 初 め て の 人 に は 新鮮 な ゲー ム で すね 。 目 が 疲れ る けれ ど 、 これ は キー の 場所 を 正確 
に 早 こう つ 練 習 に も な る し 、 他 の ゲー ム な ど を する 前 の まえ の 指 な せら し と し て や る の も 、 い いん じゃ な い ガ が なぁー。 
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240 
250 
260 
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2BO 
ら 290 
ささ 0 
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さき 2O 
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さら 0 
さ 70 
さ 8O 
さ 90 
全 OO) 
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420 

さい 
440 
450 
460 
470 
480 
490 
OO 
ら 1 0 
2O 
53O 
4 
55o 
6Q 
7O 
に 1=【 
9O 
600) 
610 
620 
6 さ O 
640 
650 
660 
670 
6 ヨ O 
690 
Zoo 
710 
72O 
73O 
74O 
75o 
76O 
フフ 7o 
78o 
79o 
oo 
B10 
に 9 

さき 0) 
840 
5Q 
60 
7O 
に に 0 
9 
0) 
910 
920 
9 
940 


本 ジッ 
人 三 ! 


HT(1)=BOOs HIT (EE)=Z7008HT ( ゴ ) =6003 HIT (4) =550』 日 1 (5) =550O GUSUE 780 
IT= ニ 1 :F 人 ロニ 0 ビー ワウ 7 ョ F=1 2 ご ミロ =1 : ゴ = ミュ = ニ S000 ュ し =2 ェ RANDOMI ZE:FUEE 0。O: TEMFO 5O 
B0SUE 510gLOUCATE 7 プ 。 ア 7:gFRINT "FUSH TYFE" 


FLRY "F リ まさ OO0O0s TEMFO .6:FUR _D=1 TOD JiFOR =E TO F 
ON B GOUTOU 150。190 
COLOR 6。OiLOCATE 17。7gFRTINT CHR ま も (C) iCDLUR 7 プ 。O 
= イー1: IF TO THEN まま ="RETIRE": GODTUD 390 
LOCATE 14.5sFRINT TsiPICE ド FsTF EE SC THEN 160 
BOTOU _ SEO 
H テ INT(RND (1) 4)+ す 97s COLUR 6。 QiLUCATE 17。7sPRINT CHR ま (H) : COULOR ア 。 り 
T=T イ ー1 』 IF T=0 THEN ま ="RETIRE "BOTD 39O 
LUCATE 14.SiFRINT TiFICE ド gTF EE SH THEN 2OO 
Fa ロニ FR+1 giPLRY "BEBO。 生 5OOO 
IF FR=SO_UR FA=4O_ DUR Fa=6O_UR FA=BO DR FA=1OO THEN 25Q 
LUOCATE 1.。13sFRINT 尼 = GOTOD 26O 
COULOR 1。6iLOCATE さき 1。1 さ PRINT "キリ 
n=USR (まま OOO ) 
CULUR 7。0: LUCATE 9。10:PRINT HB ま (T) CULDR 4。O 
FOUR U=O_TOU 1OOs NEXT 
UN 1 GOTOU 300。 さ 10。 さ 20。 さき 0 。 さ 40。 うさ 50 
T= ェ ご : じ 生ま = り 閣 "BUTO さら 60 
TI= さ し ま = リ 計り ュ BHT さ 6O 
[= テオ 4: じ ま = リ 較 " BOTOD さき 60 
[= コ 5: じ ま = リ 床 "s GUTO さき 60 
[=6: じ ま = リ 閣 " BOTO さき 60 
=1 し じ ま = リ 失 人 5 BHTO る 6 
NEXTsNEXT 
IF ロ =2 THEN TEMFO 5OsFLAY 
E=1 =F=1 1 : ロ = マミ ゴロ テ 25 GUTD 130 
LUCATE 2。9:FRINT 器 多 sFUR U=O_ TO 5OOQOsNEXT iCLSG: CULUR 4:LUCATE 6。 ご O 
PRINT "YOUR EEEF TIME" ョ TiEDLDR 6:LDCATE 10。OgFRINT "TYPFE RUNNING" : =1 
IF_ HI(M)ST THEN 446 
M=M+1: IF MM=6 THEN 45O 
BUTOU 41O 
FOUR ド =5 TO M STEP -1:HT( ド ) =HT (ドビー1 ) si NEXTi HI (M) = 本 
CULUR さ sFUR ドド =1 TOD 5 
IF HI(E)=T THEN COLOR 
LUOCATE 5。LsPRTINT に に 』 "も "3 HI( に ) 5 ヒデ し + さ 。 CDULUR さき 』NEXT 
COLOR 1:LOCATE 7。1BiFRINT "FUSH ERETURN] EEY" 
FICE LTF し = まあ D THEN 11Q 
BOTOU 490 
全 ま = じ HR ま (まま 1F ) + じ CHR 和 ま ( ま 1D) + ビ HR ま (1D) + す CHR ま (1D) 
ER 季 (1) モリ テー リ 十 合 事 オリ トナ リオ 全 生 キリ ニー リ 
日 まあ (ご ) モリ ア イ ウ リオ 人 事 リ エ オカ リオ 人 あす リキ ウケ " 
日生 (さき ) = リコ サシ リオ 内 生 キ リマ タリ リオ 人 第" 
H ま (4) モリ 補 りす 仙 生 すり ネー 本 仙 和 あす り バーリ 
H ま ( コ ) = テリア チ ウ リオ 全 和 オリ エリ カリ 十 合 生 す リキ ワケ" 
あま ( ら ) = リ コ サ ミ リオ 仙 生 キリ マセ リリオ 人 本 す " 
じ LSsCOLUR SOsaLOUEATE 10。OsFRINT "TYPFE RUNNTNG" 
CULUR 3。 OiLUCATE 7。SsFRINT "FRDBRAM by T.M" 
LUCATE 2。3gFRINT "CHARQCTER by 8.M" 
COLUDR 4。O0iLOEATE 10.5iFRINT "TIME 2O00" 
FOUR _U=O_TO 31sLUCATE U。1 ミ sgFRINT " 較 "i ELODCATE 有り U。14:FRINT 間 
LOCATE U。15sFRINT " 下 ELOEATE 有り U。16:FRINT 「 王 ": 
LOCATE U。17gFRINT の 語 "igLOCATE U。18:iFRINT "店"』 
LOUCATE U。19sFRINT "agLOEATE U。 SOgPRINT "0 "』 
LOUCATE U。E1giFRINT "リー" ョ gNEXT 
LUCATE 7。Z7gPRINT "FUSH ERETURN] EEY" 
FICK Ei TF ドド = まま D THEN LUCATE Z。7gPRINT " 
CULUR 7。 OiLUCATE 9。10:FRINT 日 委 (1) 
FOUR U=Q_ TO 100NEXT 
UN 1 GOTO ZS0。7 さ 0。 740。 750。 760。770 
= ご s GUTOU 68O 
= さ 3 GOTO 68O 
T=4: GUTOU 68O 
T= ら 5: BUTOU 680 
+= ら 6 GU0TO 68O 
=1sG0UTOU 680 
FUR U= ま DS8B TO ま D657』READ U ま も :』FUEE U。VaL ("まり すま) NEXT 
FUR U= ま 2000 TU ま 2OOD:READ UsFUEE U。 VAL ("りす 日 和 ) : NEXT 
Da「 谷 00。00。00。00。 03。 07。04。1C。O0。 OO0。 18。 1F。 DD 。F9。 6F 。 呈 F 
Da「 全 O0。00』。00。OO。 00。 ヨ 0。B0。 ヨ 0。 OO。QO。 OO0。 OO0。Q1。01。01 。0 ミ 
DaTa 78。FB。FO』。FO。F 昌 。 7 ビ 。BF。CEF。OO0。OO0。 OO0。 OO0。00。00。 OO。BO 
DAT 0O3。07。06。OE。 0OC。 CB。 18。1C。B1。01。03。 0 る 3。 02。 0 さ 。O1 。 OO 
DAaTAa 0。80。00。00。 00。 00。B0。O0。 OO0。 00。O き 。 0 フ 7。04。1C。OB。 OO 
DaTa 18。1F。DD。F9。 フ F。 7 フ F。 7B。FO。 OO。 OO。 OO。B0。B0。 ヨ 0。 OO。 OO 
DATR 3B。09。0D。07。0 フ 7。07。0 さ 3。 OS。FO。 7E。 BF。C7。 ヨ 0。 ヨ 0。 OO。 OO 
DaTR_ OO0。00。 00。 ヨ 0。 ES。 フ ビ 。 08。 OO0。FO。EE。 DF。 CZ。 ヨ 0。80。 0O。 OO 
DaTA 00。00。 1 日 。1F。DD。F9。 7 フフ 。 6F 。 7B。F 昌 。FO。FO。F 日 。E じ 。 DF 。 CF 
DaT 人 AO00。00。 1 日 。 1 じ 。 1C。 3 日 。 7 ビ 。 7 ビ 。 0O0。01 。 OO。O0。 00。00。 00。 0O 
DQTR EC。DC。E5。 う 9。 44。FC。EB。EB。 6C。 6C。6C。5C。58。50。60。 7 
026 二 合 DD 00。、19。1 ビ 。 1 じ 。 う る B。 プ じ ビ 。7 じ 。、 OO。 の 1 。 00。00。00。 06O。 0O。 0 の 
りす 全 人 じ 。 日 じ 。9F。 ラ 5F 。 40。FC。F 日 。 BB。 7C。 ら 5 ビ 。 6C。 5C。 5 日 。 さ O 。 20 。 50 
DAT CB。C デ 。aOD。a6。01。a ョ 7。0O。 0B。 日 C 。 と で Df す 。 つら 。 すら 6。 さ 9 
RETURN 


"FFP まう 3000』 昌和 ま =" リ BODAL IN" GODTO 390 


"s RETURN 


を や つて の け だ 。 そ れ が ガ 、 お むち ゃ くち ゃ な も の だ つ だ と いう こと は いう まで も な い 。 


一変 数 リス ト 


H | ( ) Sie 


AA: 規 
の 


/* イ スコア / (すす ー 
の ) 

つ だ 距離 (TYPE 
回 数 ) 


G…… 前 半 、 後 半 の 分 岐 


CO$…… 地 
肥 測 に 
の 違 央 xs 
田 プロ グラ 
100-110 
120 
130 一 210 


220~360 
370 


360 
390-500 


510~570 
560 一 660 
670 一 770 
760 一 /90 


600 一 920 
930 一 940 


面 の キヤ フク 


人 の キャ ラク 


ギヤ ラン タ ヨ ー ド 
ム の 説明 

初期 設定 

画面 表示 

前 半 、 後 半 の キー 入 
力 と 判定 

人 、 地 面 等 の 表示 
100m 走 つた か の 判 
定 

後半 の 変数 設定 
ベス ト ら 、 記 録 の 表 
志 

人 の キャ ラク 
画面 表示 

pe 
セフン ンタ 、 マタ シル 
語 の 読み 込み 

キヤ ラク DATA 
マシ ン 語 DATA 


一 チェ エック ボイン ト 
キー ボー ド の 早 押 し ゲー ム で 
す が 、 人 の 形 が だ い へ ん 良く 、 
つい つい 遊ん で し まい ます 。 
と ころ で 、 表 示さ れ て いる 文 


が 、 小 文字 で 見 づら い 場 合 は 、 


150 行 の C 


HR$ (C) を CH 


RS (Cー32) , 190 行 の C 
HR$ お (H) を CHR$ (Hー 
2) に ガ え て みて ぐだ さい 。 


まだ S テバ ダイ プ し だ と き に 、 


時 間 や 距離 の ベ ナ ル ティ を 付け 
て も お も し ろ い と 思い ます 。 
UE みり 


(ひん し ゅ ぐ そ の 2 ) 切 5 日 後に 、 な ん と パン プ は 、 プ ロ プ ラム が で き て いな い の に 、 原 稿 を 入れ る と いう 、 


ひん し ゅ く 技 ら の 


に 
ギド 
m 
ミ 
較 


ブ プログ ラム ポ シェ ッ ト 第 3 号 に の っ 
た 『BEES /」(PC-6001 用 ) の グレ ー 
ドア ッ プ 版 と いっ た と ころ か な 7? ( 作 


is5R 本 人 必 J 9』 和 Ti 
WW | て K く の 殺 P 4 に 1 
m ジ や C ん 中 手 K 買 を な 
の つつ DD 5 こら い 便 つ 症 
io 共 し CD71 
Rs す 」ーー 5 い コ 
UTE ぽか ン 
と クー は 1 う 
lm る 月 同 | 作 に り 和 
だ い 誌 た R 」: 
0 ッッ ー - ここ | RW 
- 」 四 還 還 還 1 2 1 
ここ ここ エミ ご ここ ここ ここ 


2 の ポテ っ ビー 
表 何 


VI に K 提 


玉 プ ログ ラム の 説明 

1 マシ ン 語 読み 込み と チ 
ツタ 

の て 3 マシ ン 語 と DATA 

4 初期 設定 

ら 四角 表示 と チヨ ウチ ヨ 
消去 


5 キー スキ ャ ン 
が チョ ヨウ チヨ 死ん だ か の 
判定 
ら どー とら ツー ム オ ー バ パー 
10 マシ ン 語 の まち が い 表 
志 
一 チェ ッ ク ボ イン ト 
この ワー ム は 、 ゲー ム オ ー ル バ 
ー 後 BEEP 音 が ザ な つて 、 か つて 
に REPLAY し て し まい ます 。 
そこ ご で 、1 行 の THEN 1 の を 
1 イ 1 。40 行 の ブロ グラ ム を 147 行 
し て 。 
9 LOCK 上 ドド を 
くう 32 THEN 8 
1 の GOTO 4 
さら に 4 行 の 先頭 に ら ニ の を 
入れ て くだ さい 。 ス ペース で リ 
プレ ー に な り の ます 。 (エイ キチ ) 


央 
廊 


則 
央 
川 
| 


川 


1 


議 
則 


4 動い て いる と それ つ ぽ いけ ど 、 写 
真 で 見 る こさ す が ガ に わけ が ガ が わが ガ ら ん 。 


者 は 違う けど ) る だ け 長 いあ い だ 、 よ けつ づけ る ゲー 


『BEES /』」 は 新鮮 な 斜め ゆ ス クロール ぬ だ 。、 作 者 の パイ スコ アテ は TL19 点 た そ て 
カ 匠 本 力 の 1 画面 どっ た けど 、JR-200 版 " うだ けれ ど 、100 点 超え を たら 、 キ ミ は ニ 


で は な ん と ダブ ル の 終 め スク ロー- ル 。 
チョ ウチ ョ を カー ツル ・ キ ー て 左 有 に 
動か し て 、 白 い 四 角 や の 四角 を で き 


eee グ ュ の ご だら 
リプ レイ に 難点 が ある の で 、 チ ェ ッ 
ク ポ イン ト を 参照 し て 改造 し よう 。 


(ひん レ ゅ こく その 3 ) バンプ が 、 徹 夜 を 覚 林 し だ フー の も と に プロ ブラム を も つて きだ の は 、 切 8 日 後 の 23 : 00 だ つ だ 。 逃 
げ る よう に 帰 つ を バン プ を し り め に クー が ガ プ ログ ラム を 走ら せ て みる と 、 し つか り バ ブ つ て い だ 。 


完 極 の マザー シッ プ を 破壊 せよ / ノ 


PBGGDEESIIT2K 


い 
JaL コ 
し 


| まけ 5 6 2 


人 いい 
に コ 5 6 1 ヨコ 1 コト 。 
HET SPP] 区 EE 
_  《 と う る うお る WenSOK 6 SAT 


4 ご つ で 一 す 。 な ん と な ご 、 大 き な 飛 
行 機 が お じ ぎ し て る よう に 見 えな いや 


や 、 造 び 方 


RUN す る と 、 ち ょ っ と ハイ テッ ク な 
ムー ド の タイ トル 画面 。、 ス ペー ス ・ キ 
ー で ゲー ム ス タ ー ト が だ 。 

カー ソル ・ キ ー で 自 機 を 操作 し て 、 


4 ム 相 うち に な る か ……。 ち よっ つと で も 
早 こ あな つ だ ほう が 負け に な る 。 


用 8 衣 衣 。 朋 8 8  】 
9Y ゲ イィ ん 佐 受 土 方 こ 私 % 
mi0 ム ン だ 有 衣 験 浦 で ゲ 千 』 
sm を が グ 上 昌和 生 の 療 ! を 和 
y ズ っ (1) 樹 の 攻 の そ 
| 
| イ か ん 〈 勝 う 
| 6 ょ 、 雇 肖 
5 / お 4 
し る 方 験 
オオ と と こ は 生 
る 思 だ と な 
まとう よ な ん 邊 
上 い 人 ミ る だ 邊 
いい は そ ぞ に か 人 ペ ま 邊 
sm よ 4 れ イ く (Hm 
ms 6 か ルイ ん 
s 05 を ン (は 
行 撃 ケ さ 
W の こ つ ユン て 
WNW M の タタ な 「W 
| ここ ここ ご ここ ご ここ に 7 


者 


0 8 
と 


で は その うえ ぇ に 敵 が 下 


1 面 に つき 10 機 の 敵 を や っ つけ よ う 。 か ら 出 て き て 、 も う メ チャ クチ ャ 。 そ 
ミサ イル は スペ ー ス ・ キ ー。 自 機 の コ し て 、5 面 で は 、 ス ピー ド は あがり 、 
ント ロー ル は 加速 する よう に な っ て い し か も 敵 は 上 か ら 出 た り 、 下 か ら 出 た 
る の で 、 慣 れ な いう ち は ち ょ っ と 難し り ……・ 5 
いか も 。 て も 、 そ で そこ が お も おもしろ き に も 5 面 で は 、 最 後 の ほ うに 、 ど で か い 
な っ て いる の が だ 。 マー シッ プ も 現れ る 。 こ いつ を も と 
1 面 か ら 5 面 まで 、 敵 の 攻撃 は パタ め れ ば プロ ジェ クト 成功 。 も し 、 逃 が 
ー ン が 変わ っ て 〈 く る 。 ま ず 、 1 面 は 敵 し て し まっ だ ら も う 1 度 5 面 を な はじめ 


が 上 か ら 出 て き て 、 下 まで 行っ て し ま か ら や り 直 すこ と に な る ぞ 。 
うと 反転 し て 下 か ら 攻 撃 し て くる (し 5 面 全部 クリ ア し た ら 、 ど きっ と ボ 
か も 自分 は 下 に 攻撃 で き な い /)。2 面 ー ナ ス 占 。 


で は いき な り 下 か ら 敵 が 出 て くる 。 3 
面 で は 、 ス ピー ド も 早 
く 〈 く ミサ イル も サイ ド ワ 
イン ダー に 変化 。 4 面 


ジョ イ ・ ス テイ ィ イッ ク で も 遊べ る よ 。 


シャ ー ン 。 や られ て 
も うだ 。 で も まだ / 機 も 
ある か が らい いも 一 ん 。 


セー ジョ マツ サー シ 
の 8 坦 。 う つ 、 うう 
わけ も な ぐ く こ わい ! 


葵 独特 お 動き 万 を する ん だ よね エ 、 相 手 は NR 。 ご の 動き に 立ち 向う の は 、 な か な ガ 難 し いと 思い ませ ん や (ゆみ が 下手 と いう クア 
) や る か や られ る か の ゲー ム は 、 数 多い けれ ご ど 、 こ の 変 つ だ 動き を 一 度 味 わ つ て ほし い ど うえ ー す 。 


falh 光 SH 牛 m ロ om い 


し 
に お 


キー ささ ぐ S 光 ご ざ * 党 行 さ や で 訪 則 問 


叶 ベ 


へ 難 A ビ mm 錠 寺 一 一 ロ ベ の る 。 は の 且 


19 SCREEN2.2.9:OPEN"GRPI "AS##1:DEFINTA-Z 

29 HS=9:RESTORE569:FORL=9TO12:A$=" "EEFORT=1TO32: READB$: A も =A$ も +CHR$ も (VAL("&H"+B$) ) :S 
PRITE$(L)=A$ENEXT TL 

39 COLOR 15.1.1:CLSELINE(9.9)-(256.192).7。B:LINE(19、19)-(246.182),7,B:FORT=9TO2 
49 PSET(199-1,39),1:PRINT#1。 "PHOENIX" EPSET(48-1,179).1:PRINT 拉 1 。"(C) 1984 MASAKI 
SATOH" 

S59 PSET(89-I,159),1:PRINT 持 1。"HIT [SPC] KEY" 

69 PSET(195-I,87),1:PRINT#1 」"M.SHIP" EPSET(84-1 139),1:PRINT#1。 "SHIP" 

79 PSET(135-1,139),1:PRINT#1 "ENEMY "ENEXT 

89 PUTSPRITE9,(119.59),14:PUTSPRITE19,(126.59),14:PUTSPRITE11,(119.66),14:PUTSPR 
ITE12,(126.66),14 

99 PUTSPRITE9,(99.195),14:PUTSPRITE1.(99.195).15:PUTSPRITE2.(144.195),Z 

199 ST=STRIG(9)+STRIG(1):TF ST THEN S=9:TP=9:NK=19:ME=1:GOTO 119 ELSE 199 

119 ON ME GOSUB 849,849.859.859.869:CLS:BY=1:BX=RND( 1 ) 223+ 1 

129 FORI=9TO13:PUTSPRITEI,(257.193) .9:NEXT 

139 LINE(19.179)-(242。191),1.BEF:LINE(19.179)-(242.191).9.B:LINE(9,9)-(256,192 ) , 1 
SB 

149 FORI=9T02:PSET(29-I,181),1:PRINT#1。"SHIPE"EPSET(142-1.181)。1:PRINT#1 "SCORE: 
": NEXT:GOSUB 899 

159 PSET(99.89):PRINT#t1、 "PROJECT "SMEEPSET(199,129).9:PRINT#1、 "STARTIIPTEIF ME=4 0 
R ME=2 THEN TI=TI+3 

169 PSET(99,199),1:PRINT#1.A も iTID" ID 99"ILINE(78.77)-(175.139) CO,B:FORI=9TO5999: 
NEXT 

179 LINE(78.77)-(175.139),1.BF:FORI=19TO177STEP15:LINE(9.1)-(254.1),CO:NEXT 

189 FORI=19TO246STEP15:LINE(T,1)-(T,177).COENEXT 

199 A=129:B=199:C=9:D=-3 

299 X=RND(-TIME)x249:QE:Y=9:CH=2:MS=9:MI=9:IF ME=2 0R ME=4 THEN Y=193 

219 IF ME=5 THEN LsRND(1)x2:IF L=9 THEN Y=193 

229 PUT SPRITE 9,(A,B),14:PUT SPRITE 1,(A,B),15:W=STICK(9) OR STICK(1 ) 

239 C=C+(W=6)+(W=7)+(W=8)-(W=2)-(W=3)-(W=4) :D=D+(W= 8)+(W= 1)+(W=2)-(W=4)-(W= 5)-(V 
=6 ) 

249 IF C=>19 THEN C=19 ELSE IF D=>19 THEN D=19 

259 IF A+C= く 9 OR A+C=>249 THEN C=9 

269 IFB+D= く 9 OR B+D=>163 THEN D=9 

279 IF ME=5 AND TP>=9 THEN GOSUB 879 

289 EX=(X>A )-(X く A) :EX=EX※4・XX=X+EX 

299 PUT SPRITECH, (XX,。Y) ,7 

399 IFY=>B+59ANDCH= 2THEN319ELSE339 

319 Q=-E:CH=5:PUTSPRITE2,(9.9) ,9:PUT SPRITE3,(X。Y),7:FORI=9TO199:NEXT 

329 PUTSPRITE3,(9,193) ,.9:PUTSPRITE4.(X,Y),7:FORI=9TO199:NEXTEPUTSPRITE4.(9.193) , 
り 

339 IFY= く <B-59ANDCH=5THEN349ELSE369 

349 CH=2:Q=E+4:PUTSPRITE5 , (9,193) ,9:PUTSPRITE4.(X,。Y).7:FORI=9TO199:NEXT 

359 PUTSPRITE4.(9,193) ,9:PUTSPRITE3,(X,Y) ,7:FORI=9TO199:NEXT:PUTSPRITE3, (9,193) , 
り 

369 IFA+19>X AND A-19<X AND B+19>Y AND B-19 く < く Y THEN 799 

379 IF MI=1 THEN 4099 

389 IF A+19=>X AND A-19= く X THEN MI=1:Z=X:U=Y ELSE 449 

399 IF CH=2 THEN G=12 ELSE IF CH=5 THEN G=-12 

499 IF ME<3 THEN 419 ELSE IF Z<A THEN Z=Z+3 ELSE IF Z>A THEN Z=Z- さ 3 

419 U=U+G:PUTSPRITE7 ,(Z。U) ,15 

429 IF A+19=>Z AND A-19=<Z AND B+19=>U AND B-19= く U THEN 799 

439 IF U=< く 9 OR U=>192 THEN MI=9:PUTSPRITE7,(9,193) ,9 

449 ST=STRIG(9)+STRIG(1):IF ST AND MS=9 THEN MS=1:MX=A:MY=B ELSE 469 

459 PUTSPRITE8,(A,B+16) ,.9:FORI=9TO199:NEXT:PUTSPRITE8, (9.192).9 

469 IF MS=1 THEN MY=MY-19 ELSE 5S9 

479 IF ME>=3 AND MX<X THEN MX=MX+2 ELSE IF ME>=3 AND MX>X THEN MX=MX-2 

489 PUTSPRITE6, (MX,MY ) ,15 

499 IF MY=< く 9 THEN PUTSPRITE6 ,(9,.9) ,9:MS=9 

599 IF X+19=>MX AND X-19= く <MX AND Y+19=>MY AND Y-109= く MY THEN S=S+199+RND(1)※49+109 
ELSE 559 

519 RESTORE699:FORI=9TO13:READD:SOUNDI,D:NEXT : PUTSPRITE7, (9.193) ,9:PUTSPRITE6,(9 
。193) ,9 

っ 29 FORI=YTO192:PUTSPRITECH,(X,1) ,7:PUTSPRITE8,(X,1).9:NEXT 

539 TP=TP+1:IFTP=19ANDME く >5THENME=ME+ 1 :TP=9:IFME=6THENME=1:GOTO 119 ELSE GOTO1109 
549 FORI=9TO1999:NEXT:GOSUB 899:GOTO 209 

559 Y=Y+Q:A=A+TC:B=B+D:GOTO 220 

569 DATA99,99,99,99,99,99,99.92.92.92,92,92.99,99.92.92.89、89.89.89,89,49,41,.E1。 

F9.FF,FF,7F,49.49,.79,F8 

579 DATA91.91.91,91.91,.92.82.87,.9F,FF,FF,FE,92.92.9E,1F,、99,99,99,99.99,99,99,099, 

99.99,99.99.99,.99,099,090 

589 DATAIF,9E,92.92,FF,FF,FF ,3F,27,22.92.91.91.91.91.91,F8.79,49.49、FF,FF,FF,FC, 

E4.44.49、89,89.89,89,80 

599 DATA91 ,91,91.1F,9F、93,FF,3F,92,.92、91,91.99,99,99.99,89.89,89,F8,F9,C9,FF,FC, 

49,49.89.89,99,99.909,99 


プク や っ (ひん し ゅ こく その 4) バグ 入り プロ プラ ム に つい て 、 と いつ め よ ー と 、 次 の 日 みん な 待つ て いた の だ が ガ 、 パ ンプ は 、 い つ ご 一 
8/ に 来 な か つた だ 。 パ ンプ の 日 程 表 を みる と ヾ お 休み ーー ツル ン ル ン ” と か いて あつ だ の だ 。 


699 DATA91 91.91.91.92.1E,93,FF,91.99.99、99,99,99,99,99,89,89,89,89,49,78,C9 ,FF 。 
89.99,99,.99.99,99,99,90 

619 DATA91 91,.91.91.91,93.23.27.3F,5F,DEF,DF , 93。93,9C,1E,89,89,89,89,89,C9,C4,E4。 
FC,FA,FB,FB,C9 ,C9 , 39,78 

629 DATA91.91.91,93.91.91.91.91.91 91.91.91 .93.93,93.93,89,89,.89,C9,89,89。89,89。 
89.89.89.89,C9,C9 ,C9 ,C9 

639 DATA91.91.91,.91.91.91.91.91.91.91.91、91.91.91.91.91.89,89,89.89,89,89,89,89。 
89.89.89.89.89,89,89,80 

649 DATA81、91,92.25,55,DS5,A9,35.A5,5B,6C,11.9A.95,81.92.C1.49.A4,.74,A9.94,A5,75, 
22.54.92.A9.C8.29,59 ,A9 

659 DATA99.99.99.99.99,.99.99.99,99,99,99.99,99,99、99,99.91 ,91,.91,.91.91.91,93,FB, 
FA,FA,3A,96,.96,.96,.97,07 

669 DATA89,.89.89.89.89,.89,C9,DF,5F,5F,5C,69,69,.69,E9,E9 ,99,99,99,99,99,99,99,99, 
99.99.99,.99,99.99.909,.099 

679 DATA9F,FF,FF,7F,9D,99.1E,99,99,99.99.99,99.99,99,99.FB,FB,FB,FB,FB,67,97,F7, 
97. り 7.97,.95.96.93.91.990 

689 DATADF,DF,DF,DF,DF,E6 .E9 ,EF,E9,E9 ,E9 ,A9,.69.C9,89,99.F9,FF,FF,FE,B9 ,99、78,90, 
99,99.99.99,99.99.99,99 

699 DATA9.9.9.9.9.9.21.247、16.9,9,199,69,0 

709 RESTORE699:FORI=9TO13:READD : SOUNDI ,D:NEXT : NK=NK- 1 : PUTSPRITE7 , (9 ,193) 。9:PUTSP 
RITE6,(9.193).9:IF NK=9 THEN 739 

719 FORI=BTO192:PUTSPRITE9,(A, エ ),14:PUTSPRITE1 ,(A,1 エ ),15:PUTSPRITE8 , (A, 1 ) ,9:NEXT 
729 GOSUB899:GOTO 199 

739 COLOR7 。1 1:CLS:FORI=9TO12:PUTSPRITEI ,(9.193) ,9:NEXT:FORI=9TO13:SOUNDI , 9 : NEXT 
749 LINE(9.9)-(256,192).7.B:LINE(19,19)-(246,.182) ,7,B:FORI =9TO2:PSET( 73-1 ,60 ) , 1 : 
PRINT#1 、 "GAME IS OVER" 

759 IFS>HSTHENHS=S:FORL=2TO15 :COLORL :PSET( 45,149):PRINT#1 "YOU MADE HIGH SCORE! " 
・ NEXT 

769 COLOR 7:PSET(69- IT,.89):PRINT#1 ,。 "HI-SCORE IS":HS 

779 PSET(53-1,199) 、1:PRINT#1 "YOUR SCORE IS"iS 

789 PSET(53- 1 ,129) ,1:PRINT#1 "START IS [SPC] KEY":NEXT 

799 ST=STRIG(9)+STRIG(1):IF ST THEN 3 ELSE 79 

899 FORI=9TO013:SOUNDI ,9:NEXT:SOUND 8,13 

819 FORL=2TO12:PUTSPRITEL (9,.193) , 9 : NEXTL 

829 LINE(69,181 )-(84,199) , 1 , BF :PSET( 69 181 ) , 1 : PRINT#1 ,NK 

839 LINE(198,181 ) - (249,199) , 1 ,BF : PSET( 199,181 ) , 1:PRINT#1 ,S:RETURN 

849 CO0=4:E ビ =4:TIT=8:A$= "AM":RETURN 

859 CO0=9:E=5:TT=2:A$="PM" : RETURN 

869 CO0=3:E=6:TI=8:A$="PM": RETURN 

879 PUTSPRITE9, (BX, BY ) , 14:PUTSPRITE109,(BX+1 6 , BY ) , 1 4 

889 PUTSPRITE11,(BX,BY+16) ,14:PUTSPRITE12,(BX+16,BY+16) ,14:BY=BY+3 

899 IF MS=1 AND BX+24>=MX AND BX-5<=MX AND BY+24>=MY AND BY-5<=MY THEN 919 

999 IF BY=>192 THEN 989 ELSE RETURN 

919 RESTORE699 :FORJ=9TO1 3:READD : SOUNDJ , D : NEXT 

929 FORI=2TO14:PUTSPRITE9, (BX , BY ) , I :PUTSPRITE19,(BX+16,。BY) , 1I:PUTSPRITE1 1 。(BX , BY+ 
16),I:PUTSPRITE12,(BX+16 ,BY+16 ) , I : NEXT 

939 FORI=9TO12:PUTSPRITEI ,(257,。193) ,9:NEXT 

949 FORI=9TO3:COLOR ,9:CLS:COLOR ,1:CLS:NEXT :FORI =9TO2 

959 PSET(59-1I,59) ,1:PRINT##1 。 "PROJECT IS SUCCESS !" 

969 PSET(99-1I,79) ,1:PRINT#1 "YOU WIN !!":PSET(58- 1』,99) ,1:PRINT#1 。"BONUS 1999 \ A 
LPHA " : NEXT 

979 FORI=9TO7999:NEXT:ME= 1 :TP=9:S=S+1999xNK:GOTO 119 

989 FORI=9TO12:PUTSPRITEI ,(257,193) ,9:NEXT :FORI =9TO03:COLOR ,4:CLS:COLOR 5 も の 朋 こ 
999 NEXT:FORI=9TO2:PSET(69- 1 、59 ) , 1 :PRINT 本 1 "PROJECT IS MISS !" 


X ら ルル @ レン ンク グ ググ 


1999 PSET(89-1,79),1:PRINT#1 "TRY AGAIN !1 "ENEXT:FORI=9TO07999:NEXT:TP=9: GOTO119 

一 変数 リス ト ・ MX.MY…… 自 機 ミ サイ ル の 座 ・ 440-500 自 機 ミ サイ ル 処 理 ・ ニ 1 の を 変更 し て 自 機 の 数 を 増 
S…… ス コア ・ _ 標 ・ 510-550 敵 機 の 爆発 * 2 で くだ きい し い 

TP…… 撃 隊 数 ・ U, Z…… 英 機 ミ サイ ル の 座標 ・ 560680 キヤ ラフ タデ ー タ  ・ また 、 画 面 の ス フ ロ ー ル や 、 
NK…… 自 機 の 数 ・ M1 …… 敵 ミサ イル が 出 て いる : 690 効果 音 デー マタ ・ 自 機 を 反転 させ る よう に 改造 し 
ME …… 面 数 か ・ 700-720 ミス の 判断 、 処 理 ・ て も お も し ろ い と 思い ます よ 。 
ST……STRIG 入 力 用 ・ MS…… 自 機 ミ サイ ル が 出 て い : 730-790 ゲー ム オ ー バ パー : どう で も いい こと で す が 、 飛 
A…… 自 機 の X 座 標 ・ る か ・ 800 一 860 画面 表示 ・ 行 機 な の に 、SHIP と な っ て い 
BB …… 自 機 の Y 座 標 ・ 一 プロ プラ ム の 説明 ・ 870-1000 マザー シッ プ 表 示 : る の は 、 お か し いと いう 声 が 編 
CO…… 自 機 の X 座 標 増分 ・ 10-100 マイ トル 画面 ・ 一 チェ ッ フ ボイン ト ・ 集 部 内 ひら 上 が り ま し た が 、 作 


D…… 目 機 の Y 座 標 増分 


・ 110140 初期 設定 
・ 150--210 画面 設定 


・ 。 キャ ヤラ クタ 、 サ ウン ド 等 も な 
・ な か よく で き て いる ゲー ム で ・ 


・ 者 の 意志 を 果 重 し て SHIP の ま 


まで 掲載 し ます 。 (エイ キチ ) 


W…… キ ー 人 力 用 ・ 220-260 自 機 移動 ・ ね 。 ら 面 に な る と マザー シッ ツ : 
X…… 英 機 の X 座 標 ・ 270-360 敵 機 移動 ・ プ が 登場 し ます が 、 そ ご こま で 行 ・ 
Y…… 英 機 の Y 座 標 ・ 370-430 敵 ミ サイ ル 処 理  : け な い と いう 人 は 、100 行 の NK : 
や テッ (ひん し ゅ ぐ そ の 後 ) バン プ 君 …… 僕 達 は 君 の こと を 、 決 し て 忘れ な い 。Q 陽 なん て 陽 な ん て 、 ど わぁ いき らい だ 一 一 / ( タ クタ 


表 個 19 


陽 に 向 ひ つて 叫ぶ クー) 


カエ ル は や っ ぱり 、 あ な に 帰る ノ / 


し し 


4 上 の あな に 1 匹 は まつ て いる の が 、 
ピル で す 、 一 刻 。 


< る 少 遊び 万 


を そう いえ ば 、 む か し ゲー ムセン ター 
に こん な ゲー ム が あっ た だ っ け 。 

早い 話 が 、 下 に 登場 する カエ ル を 、 
カー ソル ・ キ ー を 使っ て 、 上 の 5 つの 
あな 全部 に 入れ て し まう ゲー ム 。 

だ だ 、 入 れる まで に は 、 当 然 、 困 難 
な 道 が 待っ て いる 。 


まず 、 第 1 関門 は 3 匹 の エイ リア ン 。 


こい つら 5 が 、 そ それぞれ バ ラバ ラ の スピ 
ー ド で 走っ て いる の で 、 ち ょ っ と タイ 
シン グル まち が うと 、 パ パック グン と 全 も 
CC ルル まう 。、 ん と いつ の て も 、 こ の ゲ 
ー ム は 、 2 回 し か ミス が 許さ きれ な い の 
で 、 そ うか ん だ た ん に や られ る わけ に は 


こ = 共 ト ー さ 性 mAS の OS な テコ ョ 


LU 
| 
Bl 
| 
Bl 


ーー CA こっ か の き 革 は テーmV 
mw 本 か は と は 生 び つ ぴ と Aw( ( び 当 呈 に MS 昌 


| 2 


溢 草 


ea 
eo 
ee 


| と 洗 交 田 池 
陣 洒 


| 一 ま ーh こ 1 
| 一 <S 惨 下 』 


ei 
圭 で ぐ き で 。 な で と ど コ で と は の 了 コ 邊 


WO 湊 t 人 サー アコ こく トー さび OS きい 定 


ロ N ゆ と SS nr 人 半 コー ニ さ さ 1 
mm mn nn mmm mn mm mm mm nn mm の 


と LIL 1 1 N IL IL IN IE NL MM IM MM MM 


< 


ここ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニー ニー 


表 何 * 


2 セン 、 や ヤン 。 よ 
うつ や く 2 グ 匹 、 あ な に 入 
うだ レス 。 


いか が がい 。 エイ ルデン 
の それ ぞ れ の 動き を 了 予 
測 し つつ 、 中 央 の 赤い 
帯 ヘ サッ サ と 行っ て し 
まお う 。 こ こ は 安 全 地 
帯 な の だ 。 

き て 、 次 は 、 い よい よ 川 へ 飛び こむ 
ぞ 。 た だ し 、 も ちろ ん 、 川 に は 流木 が 
流れ て いて 、 こ れ に あ だ た だ っ て も アウ ト 。 
それ に 、 川 の 流れ に カエ ル も 流さ る れ て 
し まう か ら 、 コ ント ロー ル が つけ り に く < 
い 。 川 の 流れ に ちょ っ と 逆らい な が ら 、 
流木 に も 気 を つけ な が ら 、 上 に 5 つ な 
らん だ あな に カエ ル を つっ こま せよ 2 う 。 
も し 、 ラ ント ロー ル * ミス て 、 消 なじ 
ゃ な て く (大 に あの だ っ て も まあ だ いじ ょ 2 う 
ぶ 。 和 カル は ちょ っ と は ね か くん され る 
せ ど 、 死に は し な い の だ 。 た だ 、 流 本 


あと 1 匹 て 完成 。…… こん な と き に や られ や すい 。 現 に / (クッ ノ が そう で レ 。 


スバ アス ポ シ エ ッ ツ ト の 仕事 の 中 で 、 け つこ う 大 変 な の が 、 画 面 撮影 。 ESC で 止ま る も もの は いい けど 、 オ ー ル マシ ン 語 な ん も う 大 変 。 
で 


に あたり や すく 〈《 な っ ちゃ うけ ど ね 。 
で 、 ま ず 1 区 目 の カエ ル を 入れ た だ と 


し よう 。 次 、2 臣 目 、3 匹 目 …… と 入 
れ て いく ん だ けど 、 も う カ エル を 入れ 
て し まっ だ あな に 別 の カエ ル を つっ こ 
ませ ちゃ りう よ と 、 ご 衝 は ダメ 。 ミス 上 に 
な っ ちゃ う の で 、 川 の 流れ や な ん か も 
考え て 、 入 れ や すい よう に 考え よう ね 。 

カエ ル を 5 匹 、 あ な に 入れ る と 、1 
面 ク リア で ボー ナス 20 点 プラ ス 。 

ジョ イ ・ ス ティ ッ ク 派 の キミ は チェ 
ッ ク ポ イント 参照 で 改造 し ょ う 。 


いい 画面 を 作る まで 時 間 が か か る か ら 、 カ メラ マン の オサム さん に いつ も ひん し ゅ ぐ く を か つて いる (つづ く ぁ 
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SCREEN2.9:COLOR15,4、1:M=2:SC=9:F=9 
SPRITE$( 9 ) =" く ス く くく て 全 多 " 
SPRITE も $( 1 ) ="@ く の 全 の こく " 


GOSUB 859 


き 
SFRITE$(2)=" NONRIIRIIIIR S 


OPEN "GRP: "AS#1 


ONSPRITE GOSUB399 
X=199:Y=175:X1=299:X2=1:X3=159:X4=1:X5=1 :X6=1 
FORIT=1TO1999:NEXT 
ら =STICK(9 ) 

SPRITEON 

1F Y く 99ANDX く 225 THENX=X+3 

IF 5S=1ANDY>1THENY=Y-9 

IF S=5ANDY く 175THENY=Y+9 

IF 5=3ANDX く 225THENX=X+9 

IF S=7ANDX>1 2THENX=X-9 

P=POINT(X,Y) 

IF Y く 19 THEN 479 

IF P=12THENY=Y+11:PLAY "S9M3999L16E" 
X1=X1-5:X2=X2+18:X3=X3-8.5:X4=X4+7:X5=X5+13:X6=X6+20 

PUTSPRITE9,(X.Y ),。11,9 

PUTSPRITE1,(X1.164 ),4,1 

PUTSPRITE2.(X2,144 ),9,1 

PUTSPRITE3,(X3。129 ),12,1 

PUTSPRITE4,(X4.28  ),13,2 

PUTSPRITE5,(X5.49  ),13,2 

PUTSPRITE6,(X6,.74  ),13,2 

GOTO 199 


SPRITEOFF :PUTSPRITE9 , (9,299) , ,9 
PLAY"S9M4999L16AFDCAFDCGG" ,"B" 
FORI=1TO1999:NEXT 
LINE(115.199)-(189.119),13,BF 

M=M- 1:PRESET( 129、199 ) :PRINT#1 ,USING" カ エル -# せ "1M 
IF M=9 THEN799 

GOTO 169 


SPRITEOFF 

PLAY"S9M3999L16BDAFEGBCEABCDGFEGCC. " 

1F 22 く XAND33>XTHENPUTSPRITE9 , (9,299) , ,9:PUTSPRITE19,(24.15),11.,9 

IF 67 く XAND78 >XTHENPUTSPRITE9 , (9,299) , ,9:PUTSPRITE1 1 ,(79,15) ,11.9 

IF 117 く XAND128>XTHENPUTSPRITE9 , (9 ,299) , ,9:PUTSPRITE12,(129,15),11,9 
1F 13S く XAND199>XTHENPUTSPRITE9 , (9,269) , ,9:PUTSPRITE13,(179,15) ,11.9 
1F 222 く XAND238 >XTHENPUTSPRITE9, (9,209) ,,9:PUTSPRITE14,(225,15) ,11.,9 
PLAY"S8M3999L16CCCCAC" 

F=F+ 1 :SC=SC+ 2 

LINE(199,199)-(25 る ,119) ,13,BF:PRESET( 195 ,199) : PRINT#1 ,USING"POINT-#"jF 
LINE(1,199)-(79、119) ,13,BF:PRESET( 9,1099 ) :PRINT#1 ,US1NG "SC- 提 持 #" 1SC 
IF F=S5 THEN 616 


GOTO 168 
SPRITEOFF :F=9 
FORI=9TO14 人 2 
PUTSPRITEI , (9,299) , ,9 | ト 
NEXT ジ 


PLAY"S19M4999 CCDDEEFFGGAACCGGCCAACGCCAAGCCCGFEDC. " 


SC=SC+ 28 [ C〉 


一 気 に 大 ひん し ゅ ぐ の 非難 を 浴び て し まつ だ 。 い つま で だ つて も お つ ち よ こち よい な ん で す 。 (だ けち ゃ ん ) 


ペア この 前 な ん か 、 自 分 の 名 前 を 入力 する と き に 、 名 前 を 間 違 つ て 入力 。 おかげ で その ゲー ム は 振り 直し する は め に な っ て し まい 、 ググ 
表 何 


\ ヶ 
2 


へ dk 拉 motm い 4 蛋 〇 の 主計. 旭 dmO の 下 SHY 計 NINE ロ NL へ 凌 導 と NIN ロ と 計 きす へ へー 


ケロ ッ ガ ー の つづ き 


FORI=1TO1999:NEXT 
GOTO 169 


SPRITEOFF 

FOR IT=1TO2999:NEXT 

FOR I=9TO1 4 

PUTSPRITEI ,(9,208) 

NEXT 

PLAY"S19M1999C.CCCCGEEDC. . " 
PRESET(45.79):PRINT 手 1 、"%※%※% GAME OVER ※※※" 
1F SC>HI THENHI =SC 
LINE(1.199)-(255,119).13,.BF 
PRESET(159.199):PRINT 失 1 USING" HI - 音 韻 半 韻 寺 "5 日 1 
PRESET(29,199):PRINT##1.USING"SC- 間 拉 韻 斗 拓 盾 " 55C 
CLOSE 拉 1 

IF STRIG(9)=-1THEN79 

GOTO 8209 


LINE(1,1)-(259,109) ,4,BF 
LILNE(CI。1)-(250.25) 12.BF 
LNEKL。 95)ー025D。 1 19).6 BE 
LINE(1.115)-(250。190) ,1 ,BP 
LINE(25.19)-(39,.25) ,4.BF 
LINE(/0.109)-(/5.25),4,.BE 
LINE(129.19)-(125.25),4,BF 
LINEt1/0.10)-(]1/5.25〕) 4、6FP 
LINE(225.19)-(239.25) ,4,BE 


RETURN 
田 変 数 リス ト ・ 較 プ ロブ ラム の 説明 ・ 260-280 カエ ル が 穴 に 入 つ た ・ ほのぼの と し て いい で す な ー 
M…… カ エル の 数 ・ 10- 60 REM 文 か の 判断 ・ 3 びき の エイ リア ン は 、 ど う 見 
SC…… ス コア ・ 70 初期 設定 ・ 290-370 各 キ ヤラ フタ 移動 ・ て も だ だ の 車 だ こい う 声 も あり 
F…… 穴 に 入 つた カエ ル の 数 : 80-100 スプ ライ ト 定 義 ・ 380-450 ミス 時 の 処理 ・ ます が ……。 
X…… カ エル の X 座 標 ・ 110-130 画面 表示 サブ ルー の 460-590 カエ ル が 穴 に 入 つ た ・ と ころ で 、 カ エル の 数 を 増 レ 
Y…… カ エル の Y 座 標 1 ン ヘ へ と き の 処 理 、 得 点 等 ・ だ た い 人 は 、70 行 の M=2 の 数 値 
X1 て X3…… エ イリ アン の X ・ 140 ファ イル を 開く 人 表示 ・ を ガ え て こ だ さ い 。。 

座標 ・ 150 ミス の 判断 ・ 600-680 面 フ リア 判断 、 処 理 : まだ 、 ジ ョ イス ティッ ツ フ で 遊 
X4ーXG 流木 の X 座 標 "・ 160-170 各 キ ャ ヤラ クタ の 初期 ・ 690--830 ゲー ム オ ー バ ー : び た い 人 は 、190 行 S=ST IC 
SPRITE$S(0)…… カ エル  : 座標 ・ 840940 画面 表示 ・ K (の ) ,820 行 STRIG ( 
SPRITES$(1)…… エ イリ アン ・ 180-250 キー 入力 、 カ エル 秘 ・ 田 チ ェ ツ ッ フ ポイ ント ・ の ) の の を 1 に 変更 し て こ だ さ 
SPRITES(②)… 流 林 動 ・。 うん MSX 的 な ゲー ム で す 。 : い 。 (エイ キチ ) 


ガ わ いい 名 前 を 
つけ て ちょ よー だ い 
バン ズ の 描い て る ご の ネコ に は 、 ま 


だ 名 前 が あり ませ ん 。 ぜひ 、 ぜ ひ 、 読 
者 の みな さん に 、 か わい い 名 前 を つけ 


て は し いな 。 
ちな み に 、 今 の と ころ 、 編 集 部 の み 
ん な は バン フネ コ (パンズ の 揺 く ネコ 


だ か ら ) っ て 呼ん で る けど 、 ぞ それ じゃ 
あん まり で し ょ う 。 ハ ガキ 】 枚 に 7 つ 
名 前 案 を 書い て 、D99 の 儲 所 の ポシェ 
ウ ッ ト ・ ネ コ の 名 前 係 まで 。 採 用 され た 
人 に は 】 万 円 の お 礼 を さしあげ ます 。 


グ 6 テッ 私 は ひん し ゅ ぐ 者 の 代名詞 と な つて いる よう で す が 、CG 担 当 の KURO 君 も ひん し ゅ ぐ 者 で す 。 先日 、 私 が 撮影 用 の 画面 を 
提 個 4 止め て お い だ 時 、KURO 君 は 、 他 の 画面 の 撮影 の た め 部 屋 の 電気 を 消し に 行き まま し だ 。 と ころ が 、 電 気 は 消え な い (つづ ぐふ 


の る 


GGGG NF> 半 ES 
4 いつ 見 て も YUKIO の 作 つ だ ゲー ム 
は 、 作 者 の 性 格 が よく 出 て いる ね い 。 
明る く ヒ ネ ぐ れ た だ 性 格 が 。 


0 の ヵ 


RUN る せる と 、 ま ず DATA の チェ 
ウッ グ サ の が は じ ま る 。 や っ ば り 、BA5 
1I ど に マン ン 語 を 呼び 出し て 走る ブロ グ 
ラム は 、 こ の くら い の 親 切 設計 が ほし 
いも の (チェ ッ ク ポ イン ト 参 照 )。 

0 
仁 委 だら 。 こそ と 本当に RUN / 

0 "も いう タイ トル が 、 
欠け だ の 、 條 を た た だ たり 。 また 出 た 9 し ん 
が ら 、 し ば らく じっと 上 黙 っ て いる 。 こ 


れ は だ た だ 、 マ シン 語 の 読み 込み に か か 
る 時 間 の 退屈 し の ぎ 。 ち ゃ ん と し た タ 
イト ル 画 面 が 出 た ら 、 リ ター ン ・ キ ー 
70 On mio 。 と mh 
1 ら 何 田 い さ A と 六 打 
『Y ゲ で て いい こむ と ち 8B 
生ん うら 6 821 
lm さ オ な 由 っ し C MC ププ ョ 
) よ 
ント ん 2 1 220)! 
m キ の る Pp も に 1 
ュ 音 ん L ん 見 
り 楽 で A ね え 上 
mW で 作 し y み る 上 
| ay 8 3 文 な 邊 
WS て を ミレ し m 
WNW いく ずん くも 
sm ま れ あ れ は ぁ ゎぁ 
W す た る ガ 公 和 ョ 
"イィ 2 が 
W A れ の ウン 打 
W K か ね バ も 邊 
1 ] U/ 
月 有朋 8 月 有朋 上 MM MM MM M ji 
7 江 ミ エッ トー / ず ふと 見 る と 、 テ ィ ス ブレ イ は まっ 時 7 


素人 右 ! あ 


を だ だ いて ゲー ム ス タ ー ト / 

この ゲー みみ も 、YUKIO ら し く 、 ま 
57 で 見 だ こと も な いよ うな グー の 。 
画面 中 セク ルク ル 顔 えな が ら 飛 ぶ 
ボー ル を 、 画 面 の どこ か に ポコ ッ ト し と 現 
れる ゴー ル に 次 々 ! 導 《 の だ 。 
ボー ル の 進行 方 向 を 変 を 0 る の は 、 ス ペ 
ー ス ・ キ ー。 押す だ たび に 、 あ ちこ ち に 
誤 ら ば っ て いる 和 終 め の 棒 が 90 度 向き を 


る あの) オミ ンク だ けけ ビ あな で く 。 


コー ス も 考え な くち ゃ や いけない 、 リ ア 
ル タ イ ム 思 考 型 ゲ ー ム な の だ 。 
ボー ル が 重なる と 
お も し ろ い こと が 起 
こる 。 画面 上 の 多 が 
SCORE、 TITME、 DE 


上 段 中 央 に 注目 。S 


ボー ル が 眠 つ ちゃ っ だ 。 ト 


中 央 付近 に ゴー ル が 「 
あっ だ 。 ま ず 、1 個 取 
り い 。 ク 個 目 が 難し い 。 


と 0 
2 


ン 
る ン 


ATH の と ころ を 少し ずつ 移動 し て いる 
けど 、 こ れ が 重要 。 ボ ー ル が 重なっ た 


と き 、 移 が SCORE の と ころ に あれ ば 


スコ ア が 増え 、TIME の と ころ に あれ 


ば タイ ム が 増え る 。 で も 、DEATH の 


と ころ だ と 1 回 アウ ト 。 10 回 アウ ト か 
TIME 0 で ゲー ム オ ー バ ー が だ 。 

2 面目 か ら は 枠 が 広がり 、 カ ー ソ ル 
・ キ ー て 画面 を スク ロー ル さ せな が ら 
や っ て いて こと に な る 。 STOP の と こ 
ろ で 止ま っ た ボー ル は 、 い っ た ん 画面 
の 外 に 出せ ば また 動き は じ め る よ 。 


oo 


そう で す 、KURO 君 は 、 電 気 で は な く 、 パ ソコ ン 用 電源 の 元 を 切っ つて いた の で す / ツア 
避 えー ん 、 み ん な の 冷 だ い 視 線 は 、KURO 君 に 集中 し まし だ 。 (私 は だ けち ゃ ん ) 


^ ら 6 グン ジジ ググ 


へ INRmoNmN テ SHN 半 NINE ロ Ndh 光 2 人 座 て er は テ NI へ 三光 党 そ と MINn ロ NN 前 計 3% せ 


19 CLEAR 199,.8HCFFF:SCREEN 1.2.9:WIDTH 39:KEY OFF 

29 DEFINT A-Z:DEFSNG P:DIM X(64),Y(64):DEFUSR9=&HE999:DEFUSR1 =&HEC3S 

39 DEFFNA(X,Y)=&HD999+Yx64+X:DEFFNR(X)=INT(RND( 1 )*X):Z=RND( -TIME/2 ) 

49 ON INTERVAL=199 GOSUB 529 ' 

SM RESTORE:FOR 1=9TO035:READ D$:S=9:FOR J=9TO16:S=S XOR VAL("&H"+MID$ も (CD も, J※4+ 
1 ,4) ) :NEXT :PRINT "[":PEEK(&HF6A4 )x256+PEEK( &HF6A3) 1"] --- "iMID も ("NGOK" 1 -2x(S=9 
)。2):NEXT:END 

69 RESTORE :A=&HE999 : B=&HE999:C=&HD999:D=&HE889:E=&HE890 

79 FOR 1I=28 TO 31:SPRITE$( 1 )=STRING$( 8 ,255)+STRING$(8.9)+STRING も (8 ,255):NEXT 

89 COLOR15,.9,1:LOCATE 19,19:PRINT "TAP-TAPI":FOR I=9TO1999:NEXT 


99 FOR 1!I=9TO26 :READ D$:FOR J=9TO31:POKE A+Ix32+J。VAL("&H"+MID も (D や も 、J%2+1 ,2) ) 


199 COLOR JMOD16:PUT SPRITE J\8,(88+(J\8)x16,78+(IMOD4)*3x(1-(J\8MOD2 ) x2) ) , 1 ,J\8 
+28: NEXT : NEXT 「 

119 RESTORE 919:FOR !I=9TO1:READ D$:FOR J=9T03:FOR K=9TO7 

129 VPOKE &H399+Ix256+Jx64+K,VAL("&H"+MID$(D$,Jx16+Kx2+1,2) ) :NEXT : NEXT : NEXT 

139 FOR 1!=9TO5:READ D$:FOR J=9TO31 

149 VPOKE &H3899+Ix32+J,VAL("&H"+MID$(D$,Jx2+1,2) ) : NEXT : NEXT 

159 READ D$:FOR I=9TO31:VPOKE &H2999+1,VAL("&H"+MID$(D$,1+1,1))x16:NEXT 

169 FOR 1=9TO1999:POKE B+I,32:NEXT 

179 FOR !=9TO29:POKE B+I+33,ASC(MID$("[ TIME 1][ SCORE ][ DEATH ]",1+1.1)):NE 
XT 

189 FOR 1I=9TO31:POKE B+I+64,219:POKE B+I+736.219:NEXT 

199 FOR !I=2T023:POKE B+Ix32,219:POKE B+Ix32+31 ,219:NEXT 

299 CLS:LOCATE 7,5:PRINT "T AP - T A P !":LOCATE 3,23:PRINT "PUSH KEY*RET' TO S 
TART"::LOCATE 8,29:PRINT"HIGH SCORE":H:FOR 1=9TO1:Z$=INKEY$:1=1+(Z$>"") :NEXT 

219 IF INKEY$><CHR$(13) THEN 219 

229 G=9:P=9:Q=9:CLS:LOCATE 9,9:PRINT "SCORE 9 TIME 199" 

239 PLAY"T149V1305L8C.E16G4D.F16A4G16R16G8G16R16G8A4G4L1 2CEGCEGDFADFAB4A8 .B1606C 
2"。"T149V19L402CGDAGECER2 . . BA03C2" ,"T149V1303L8CEG4CEGCEGCEGCEGL6CEGDFAB4A404C2 

249 FOR !=9TO31:PUT SPRITE I,(9,299).9,I:NEXT:G=G+1:LOCATE 11,19:PRINT "ROUND"iG 
259 FOR !I=&HE899 TO &HE8C9:POKE 1I,9:NEXT 

269 W=Gx4-1:IF W>31 THEN W=31 

279 X=5+Gx19:IF X>63 THEN X=63 

289 Y=Gx19:IF Y>62 THEN Y=62 

299 POKE &HE9A7,X-14:POKE &HE9B8 ,Y-9 

399 FOR !I=CTOB:POKE !,9:NEXT 

319 FOR !=9TOX-1:POKE FNA(1,9),2:POKE FNA(1,Y-1),2:X(I)=9:NEXT 

329 FOR I=9TOY-1:POKE FNA(9,!),2:POKE FNA(X-1,1),2:Y(I)=9:NEXT 

339 S=FNR(X-2)+1:FOR 1!=1TOY-2 

349 T=FNR(Y-2)+1:IF Y(T)>9 THEN 349 ELSE POKE FNA(S,T),1:X(S)=X(S)+1:Y(T)=Y(T)+1 
359 S=FNR(X-2)+1:IF X(S)>9 THEN 359 ELSE POKE FNA(S,T),1:X(S)=X(S)+1:Y(T)=Y(T)+1 
369 Z=USR(9) :NEXT 

379 FOR 1』=1TOX-2 

389 IF X(1)=9 THEN POKE FNA(1,FNR(Y-2)+1 ) , 1 

399 NEXT 

499 FOR !=9TOW:J=I\4+(IMOD4) x8 

419 POKE E+Jx4,1:POKE E+Jx4+1,FNR(X/2)x2+2:POKE E+Jx4+2,FNR(Y/2)x2+2:POKE B+Jx4+ 
3,FNR(4 ) 

429 NEXT 

439 S=FNR(X-2)+1:T=FNR(Y-2)+1:IF PEEK(FNA(S,T) )>9 THEN 439 ELSE POKE FNA(S,T),3 

449 IF G>1 THEN FOR !I=1TOGx2:S=FNR(X-2)+1:T=FNR(Y-2)+1:IF PEEK(FNA(S,T) ) >9 THEN 

1=I-1:NEXT ELSE POKE FNA(S,T) ,4:NEXT 

459 T=199:T1=9:SPRITE ON:INTERVAL ON 

469 Z=USR(U\4) :U=(U+5)MOD64 :LOCATE T1,1:PRINT CHR$(131)::IF Z=9 THEN 469 

479 IF Z=3 THEN 489 ELSE IF Z>199 THEN 539 ELSE 469 

489 INTERVAL OFF:P=P+199x2^(USR1(9)-1):LOCATE 5,9:PRINT P 

499 PLAY "T299V1405C8E16G16D8F16A1606C2" , "T299V1405C16E8F16D16F8A1605E2" , "T299V1 


405C16E16G8D16F16A80S5C2 


599 W=W-USR1(9):IF W<9 THEN LOCATE 19,12:PRINT "BONUS" :Tx3::P=P+Tx3:LOCATE 5,9:PR 
INTP:GOTO 239 

519 IF PLAY(9)< く 9 THEN 519 ELSEINTERVAL ON:GOTO 469 

529 T=T-1:T1=(T1+1)MOD39:LOCATE 29,9:PRINT T:IF T=9 THEN 699 ELSE RETURN 

539 INTERVAL OFF:ON T1\19 GOTO 559,S560 

549 PLAY "T159V1505C8":T=T+19:LOCATE 29.9:PRINTT:GOTO 599 

559 PLAY "T159V1506C8":P=P+T\19:LOCATE 5,.9:PRINTP:GOTO 589 

569 PLAY "T159V14L1603BGBGAFAFGEGEFDFDC2" , "T159V1203L8BGAFGEFDC2" , "T159V1206L16B 
GBGAFAFGEGEFDFDC2“" 

579 Q=Q+1:LOCATE 5,19:PRINT "YOU FAILED"'iQi "TIME"T iMID も ("5S. "1-(Q21 )%2,2) 

589 IF PLAY(9)<@ THEN 589 ELSE IF Q=19 THEN 699 

599 INTERVAL ON:GOTO 469 

699 LOCATE 19.12:PRINT"GAME OVER" 


キャ ラ の 切り 張り の 条 横 を は ら す だ め に や つ だ の で は あり ませ ん 。 あ れ 最 初 か ら プ ラブ プラ だ つ だ の で す 。 (エイ キチ ) 


Z ヶ に 1 あの ーー、 こ の 場 を 借り て 弁解 させ て くだ さい 。 た し か に M5 の ビデ オ 端 子 を 引き ちぎ つた の は 私 で す 。 し か し 、 け し て MZ の 


表 合 


619 


PLAY 


"T159L16V1204GO5D4C804A#805D2C4D8C804G4."。"T159L4R4R16S9M1599902D4GO1GO 


2GCG4."。"T159V1206R16G8F8E8D8C805A#8A8G8F8E8C4D4 .“" 


629 
639 
649 
659 
669 
679 
689 
699 
799 
719 
729 
739 
7409 
7S59 
769 


LOCATE 8.15:IF H く <P THEN PRINT 
IF PLAY(9) く 9 THEN 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


"YOU ARE TOP !":H=P ELSE PRINT 
639 ELSE FOR I=9TO3999:NEXT:GOTO 209 

2323ES57E3285E8AF3287E83286E82199E91199E4919994EDB93A83E8A7291A3A9AFA 
84E8CDD899A7281D2182E87EEE01773E913283E8CD9DEB189C3A84E8CDD899A7D9BB 
20933283E83A84E8CDDS599A7F528923E9F5F3E9ACD93993A89E85F3A81E8AB974DF7 
SF3E94CD93991E993E95CD9399F1284EDD2189E8FE933894FE982993DD3591FE94D4 
9 り 12897FE953993DD3499FE943897FE973093DD3491FE963893DD3599DD7E99FE9D93 
FF2993DD3499FE492993DD35099DD7E91FEFF2993DD3491FE492993DD3591DD211CBC 
61E4ED4B89E878414FCD61EB969A9E9F7EA7285CFE022826FE932832FE942849D28F 
FE91204C3A82E8A7299ADD369969DD3621691898DD369168DD36206818323E791228 
DD7799DD7791DD7729DD77211822DD369978DD369188DD362989DD362199181929F2 
DD369953DD369154DD36294FDD36215923DD23DD239D2098112299DD191131993A63 
19198BDD2199E8FD2189E821991B9699D9DD7E99A7284DDD4691CB383842DD4EB197 
り 2CB39383BCD61EB7EA72834FE92281FFE93302AFE01292C3A82E8A73E932892357B 
SE91DDAE93DD7793CD77EB3E9118153E92DDAE93DD7793CD77EB3E92189618949E91 
CD77EBAF98DD7E99A7CA4CEBDD7E92FD4691CB2999FE14D24CEBD95FD9FD469967E3 


DD7E91CB2999FE1ED24CEB5FD97B979707C618CD4D9923D97BD9970797C698CDE753 


4D99233A85E85F98FE932998DD369999FD369793FE9329921E19FE9429921E144DD1 
987BCDESEB23789E95FE9838949E92FE1938949E9AFE1838929E9D79CD4D9923996C 
D998FE91CC93EBFE92CC98EB119499DD19D99478D9FE29C251EA2129E4112918DBC4 
り 1E992CDSC99E13A87E877C9D93ED1CD4D9923232323D998FE93D477EBAF98181B9E 
C9FSD5692699292929292929581699191199D919D1F1C9DD7E93A72993DD35927473 
3D2993DD34913D2993DD34923D2993DD3591C921B9EB189A21C2EB189521D4EB7 12F 
1899FS57E235E23CD93997EA729F6F1C9996491909819926C939999199C949D99D179 
99099064919390819926C939499199C969D9999999964919698199278939699199115 
9C199D99994FFDE5C5CD4D9996291699FD2199E8FD7E99A72819FD7E91DDBE919EFC 
2911FD7E92DDBE922999FD7E93DDBE93289114FD23FD23FD23FD2319D7C1FDE11728 
79FE14289F3A87E8A720997AA72895C6643287E8C92323E521991B019920CD4A17C7 
99FED1289C2323CD4A992B2BFE1929919C2323232319E7ZE171C9909999999099DB3A 
E999F84C321F999797091F324CF899E9AA55AA55AA55AA55E9FFE95948464742E84C 
4247464859E9FFE997FF979A1262E24242E262129A97FF9799900990999999098E2A 
99939F1F3F39797F7F7039381C9F9309909C9F9F8FC9C9EFEFE9E9C1C38F9C99981A5S 
99939F1F3F33737F7F999193979F939999C9F9F8FCFCFEFEFEFEFCFCF8F9C999F194 
99939F1F3F3F7F7F7F7F3F3F1F9F939999C9F9F8FCFCFEFEFEFEFCFCF8F9C999DBDB 
り 99930F1F3F3F7F7F7F7F3F3F1F9F939999C9F9F8FCCCCEFEFE9989C9E9F9C99 り 8F29 
り 99939F1F3F39797F7F703F3F1F0F930999COFOF8FC9C9EFEFE9EFCFCF8F0C999BD42 
90039F1F3F3D737F7F7C3B371F9F939999C9F9F8FCBC8EFEFE3EDCECF8F9C9998342 
FFFF55667777AA7DDDDSFFFFFFFFFFFF90909009999999099099909999099090955PB9 


"HIGH SCORE" 5H 


較 変 数 リス ト ・ 200-210 マイ トル 画面 ・ 機 械 語 の 説明 ・ USR1 EC35-EC5A 
P…… ス コア ・220 ゲー ム の 初期 化  : E900~E944 主 に っ トリ ガー ボタ ・ ゴー ル に 入 つ だ ポー ル の 数 
O…… 失 敗 し な 数 ・ 230-290 名 面 の 初期 化 ン を 押し た と き の : が わか ガ る 。 

X…… ス フリ ー ン の 横 の 大 き さ ・ 300 画面 デー ツタ フリ ア  : 処理 ・ 画 内 蔵 チ エン フサ ハム の 使い 方 
Y…… ス フリ ー ン の 縦 の 大 き さ ・ 310-320 か べ を つこ る ・ E945~E9BD 方 向 キー の 処理 : リス ト の 50 行 に デー タ 部 分 の 
W…… ボ ー ル の 数 ・ 330-390 フリ ッ パ バー を 作る  : E9BE<EA42 キャ ラク 表示 : チェ ッ フ サム が 入 つ て いま す 。 
T…… タ イマ ー ・ 400 て 420 ボー ル を 作る ・ EA43>EB46 スプ ライ ト の 動き : すべ て 打ち こみ RUN さ せる と 、 
T 1…… ダ イア マー ク の 位置 ・ 430 ゴー ル を 作る 8 と 表示 ・ 行 番号 を 表示 し な が ら OKI と 
り …… ボ ー ル の 形 ・440 スト ッ パ ー を 作る  ・ EB93-EBE4 音 出し ・ 表示 し て いき ます 。 も し 、NG 
G…… 面 数 ・ 450-470 メイ ン ル ー チ ン : EC35-EC5A USR1 ・ が 出 だ ら その 行 が 問 違 つ て いる 
H…… ハ イス コア ・ 480-510 ゴー ル 処 理 ・ 女 USR 関 数 の 説明 ・ の で LIST に も ど し て 修正 し て 
田 プ ログ ラム の 説明 ・520 タイ マー ・ USR0 E900-EC34 ・ こ だ さ い 。 す べ て OKI こ な つた 
10~ 40 初期 設定 ・ 530-500 ボー ル の 衝突 e ゲー ム の メイ ン な 動き 全て : ら 、50 行 を 一 庫 REM 文 に し て 
50 DATA 文 チェック ・ 600-630 ゲー ハム オー バー e ボー ル の 形 を パラ メー タ と ・ (リス ト の 空白 部 分 に REM と 
60-100 機械 語 読み 込み 640-900 機械 語 プ ロブ ラム の ・ し て 入れ る 。 ・ 打ち こん で リタ ー ン する だ け で 
110120 キャ ヤラ フタ 設定 1 上 デー タ ・  @ 帰 つて きだ 値 が 3 の 時 ゴー ・ す )、RUN さ せ て ご だ さい 。 
130-140 スプ ライ ト 設 定  : 910-920 キャ ラフ タ ・ デ ー タ ・ ル (エイ キチ ) 

150 カラ ー 設 定 ・ 930-980 スプ ライ ト デ ー タ e100 以 上 は ボー ル が ぶつ か ・ 

160~-190 画面 づく り カラ ー デ ー タ つた だ とき 


・ 990 


うと 、 本 読 11 月 号 の 表紙 を みて ちょ よー だい 。 ご これ 以上 は 上 四方 が が なめ が ガザ こわ い の で いえ ませ ん 。 


を 編集 部 豆 知 識 コ ー ナ ー)〕 ある 日 、 編 集 部 の まえ に 壊れ だ 事務 用 イス (あの 丈夫 で 有名 な や つ で す ) が 置か れ だ 。 な ぜ か と い グ の 


人 


4 ササ ッ ツ 、 ベ ン ベ ン の 横ばい 。 そ し て 
な ぜ か カニ さん は 前 に 進む 。 ま あ 、 ア 
イス ノ ク ニ だ か ら 何 で も 起き る の よ 。 


遊び 万 


ファ ミリ ー コ ンピュータ な ら で は の 
キャ ラク タ を 使っ た 楽し い ゲ ー ム 。 
な ぜ か 、 南 極 に し か いな い は ず の ペ べ 
シ ペ ン は 、 こ て 北 李 の アイ スラ ンド で 
番 人 と し て 働い て い だ 。 そ こ へ 、 サ ル 
カニ 合戦 で みごと サル に 復讐 を 朱 た し 、 
調子 に の っ た カニ 車 団 が 攻撃 し て きた 。 

ュ ン トロ ー ラ ー で 、 ペ ン ペ ン を 左右 
に 操作 し て 、 下 か ら ジ ワリ ジワ 攻め て く < 
る カカ 有三 車 団 に スナ ー を けつ り て や 
っ つけ て て くれ 。 ス ピナ ー を 投げ る の は 


NM MM W 見 見 上 旧 邊 邊 2 


。 0 且 092 豆 細 パ 
> ん / 有田 ノー 
6 ん を je 
ほ メ た け 信 1 邊 
しそ と の て 
いり 話 あ ! 「 
な の は ミラン 
る か ロク 
B る 採 グ を 
油 ( け 用 ラ 買 
S ど さ ム つ 
2 と き カ s 
| フ は た 月 
トイ 思 の ご 『 
リツ いて みろ 引 
ッ ク ま 送 - 


mmm mm mn の 


つい に ファ ミコ ン 、 初 登場 ノ 


> スピ ナー を 落と し て カニ 
を 共 退 。 一 全 に 何 匹 や も ひつ 
ガ け て 落と すこ と も 可能 。 


[Al ボタ ン が だ 。 

で も 、 ス セナ ー は 1] 回 
に 1 つ し か 投げ られ な い 
の て 、 カ ニテ が ME くま て 師 
② て きだ と き に あて そこ 
な うと も うほ と ん と 絶望 。 
慎重 に や ろう ね 。 

カニ の な か に は 特別 に 
贅 SO の GU も 、 
つの ま に か 上 まで 昇っ て き て し まう か 
ら 、 そ の へ ん も 気 を つけ よう 。 

カニ が いち ば ん 上 の 線 ま で 申 っ て き 
た ちら 、 1 ぴき ダウ ン 。 3 びき ダウ ン て 


ーッ < の ーー 
ーー ンー ニー 


人 


アイ スラ ンド は 上 古 領 る きれ ゲー ム オ ー バ 
ー だ 。 再 ゲ ー ム は モレ クト ボタ ン で 。 
一 参考 一 「 テ クノ ポリ ス 」84・5, 
『K AKI KID』 


あちゃ 、 や られ て し まつ だ 。 ベ ン ベ ン さん 、 退 場 一 。 


験 、 な ん つ 一 た つて 、 ベ ペンギン が か わい い 。 ス ピー ド を お と し て や つ だ ら 、 だ いぶ で きま し た 。 ワ ー イ ! 
大 好き 人 間 の ゆみ は 、 こ の 作品 、 う れ し い で す 。 フ ァ ミ コン 所 有 者 の みな さん 、 君 も ゲー ム ハ を 作 つ て みて くら は い ! 


アー ヘアー ュ アー リアー っ ピュ ユイ 
ーー デー デー ュ チー ユ テ 


ーー ンーーーーーーー- 
"ノコ リ = 


2 りこ デ 


19 HI=9:PLAY 
5】 / 

29 GOTO 4109 
39 ERA 9,1.2.3.4.5:SPRITE ON 
・CGSET 1.2:CGEN 2:PAUSE 1090: 
FOR Il=9 TO 5:POSITION 【I,9,.9: 

NEXT:PLAY "05" 

49 POSITION 9,129,.89 

59 IN=STICK(9 ) 

69 IF IN=1 THEN F=3:GOTO 989 
79 IF IN=2 THEN F=7:GOTO 96 
899 F=9 

99 X=XPOS(9):DEF MOVE( 9 ) =SPR 
ITE (4,F,1.99.9.9):POSITION 
9。X,89:MOVE 9 

199 IF MOVE(1)=9 THEN ERA 1: 
IF STRIG(9)=8 THEN CUT 9:DEF 
MOVE(1)=SPRITE (7.5,1.56,9, 
9):POSITION 1,.XPOS(9) ,96:MOV 
所. 』 

119 FOR I=2 TO 5 

129 IF(MOVE(1)=9)x(YPOS( TI )=8 
9) THEN 230 

139 IF MOVE(T)=9 THEN ERA 1I: 
IF RND(5)=9 THEN ON RND( 2 )+1 
GOSUB 189.199:NEXT GOTO 59 
149 IF MOVE(1)=9 THEN NEXT:G 
OTO 59 

159 IF (ABS(XPOS( T )-XPOS( 1 ) ) 

く 11)%※(ABS(YPOS( T ) -YPOS( 1 ) ) く 1 
1 ) THEN GOSUB 209 

169 NEXT 

179 GOTO 59 

189 TX=RND(81)+16:DEF MOVE(I 
)=SPRITE (14.2,RND(3)+2.64,9 
52):POSITION I,TX.298:MOVE I 
・RETURN 

199 TX=RND(81 )+144:DEF MOVE( 
1)=SPRITE (14,8,RND(3)+2.64, 
9.2):POSITION I,TX,208:MOVE 
1:RETURN 

299 CUT IE:XX=XPOS( 1 ) : YY=YPOS 
(T):DEF MOVE(T)=SPRITE (14,5 
>1。(298-YY)/2.9。1):POSITION 
1。XX。YY:MOVE 1I 

219 SC=SC+19:LOCATE 22.9:PRI 

NT _ RIGHT$(“" 2 も O よ 民 お CS は 5) 

PLAY "D9" 


"T1Y205 "EGOTO 3 


田 変 数 リス ト ・100 
ドイ ス ョ コア p | ・110 
No eee る レツ 4 8 420 


ベン ペ ジ の 彼 り 


F…… ペ ベン ペン の 向き ・ 130-140 
X…… ペ ン ペ ン の X 座 標 
1 N……STICK 関 数 用 ・150-170 


・180-190 


TX…… カ ニ の 初期 X 座 標 

MX…… カ ニ が 上 まで 昇 つ た と : 200220 
き の 移動 に 使う ・ 

プ ロブ ラム の 説明 ・ 230-290 


40 40 初期 設定 ・300 
50- 90 ベン ペン の 移動 3 


スピ ナー 発 財 
ご の カニ を 動 の すか 


カニ が 上 まで 昇 つ た ・ 
・ 田 チェ エッ フ ポ イン ト 
この プロ グラ ム だ こと 、 数 回 や ・ 
・ つて いる 間 に 、OM (アウ ト オ ・ 
・ ブ メ モリ ー) エラ ー が 出 て し ま ・ 
・ うか も し れ な い 。 フ リー エリ ア ・: 
が 少な いか らし よう が な いん だ ・ 
けど 、 記 う こう な る と 、 ハイ ス 
・ コア の 表示 は あき ら め て 、 改 め ・ 
て RUN さ せる し な いみ だ い 。 : 


か の 判断 


カニ が 動き 終わ つた ・ 


か の 判断 
スピ ビー と 力 。 の 投 
弄 判 断 


新しい カ 二 を 動 ガ す ・ 
カニ を や つつ けた と : 


き の 負 理 


ペン ペン が や られ た * 
ゲー ム オ ー バ ー ガ の ・ 


判断 


229 RETURN 


239 CUT 9:XX=XPOS(T):X=XPOS( 
り 9):MX=(XX-X)/2: IF MX く < THEN 


GOTO 259 


249 DEF MOVE(T)=SPRITE (14,7 
52。MX。9.2):POSITION TXX,80: 
MOVE 1:GOTO 269 

259 DEF MOVE(T)=SPRITE (14.3 
2 ューMX。9.2):POSITION TXX.89 


・MOVE I 


269 IF MOVE(T)=-1 THEN 269 
279 DEF MOVE(9)=SPRITE (4,.5, 
1.76,9.9):POSITION 9,X,.89:MO 


VE 9 


289 PLAY “"T403G1FEDC" EGG- 1 : 
LOCATE 25.23:PRINT Gi 

299 IF MOVE(9) 
399 IF G<>-1 THEN 39 

319 CLSEBEEPELOCATE 9.7:PRIN 
T "GAME OVER" EERA 9,1,.2,3,4 


> 〇 


329 LOCATE 4,14:PRINT "PUSH 

コン トロ - ラ -SELECT ボ タン" 

339 IF HI く <SC THEN HI=SC 

349 IF STRIG(9) く >2 THEN 349 

359 CLS:LOCATE 9.6:PRINT "アイ 
ス ノ ク ニブ マモ セレ”: LOCATE 6,14 

369 PRINT "BOMB= コ ント ロー ラーA ポ タン " 
・LOCATE 8,18:PRINT "BY YOUN 


GER" 


379 LOCATE 4,16:PRINT "PUSH 
コン トロ ー ラ -START ボ タン " 

389 IF STRIG(9) く >1 THEN 389 
399 CLS:FOR I=9 TO 27:LOCATE 
1,9:PRINT CHR$(194)・:NEXT 
499 FOR Y=19 TO 22:FOR X=9 T 
0 27:LOCATE X,Y:PRINT CHR$( 1 

95)j::NEXT:NEXT 
419 SC=9:G=2:LOCATE 1.9:PRIN 
T "HI-SCORE" RIGHT も (" 人 


TR も (HI ) ,5): 


429 LOCATE 17.9:PRINT "SCORE 
SR も CSCJ 5) 5 
・LOCATE 21.23:PRINT "ノコ リ = "iiG 


"5 RIGHT も (" 


439 GOTO 39 


・ 310-340 ゲー ム オ ー バ ー 処 理 
・ 350-380 マイ トル 表示 


390 一 430 画面 作成 


345 RUN 


の 1 行 を 加え れ ば 、 ハ イス コ : 


本 テッ ビ 
家人 1 


-1 THEN 290 


・ ア は なこ なる けど 、 エ ラー は 出 
・ な く な る よ 。 ど うし て も ハイ ス 
・ コア が ほし いと いう 人 は 、 メ モ 
・ リー に POKE し て 、、RUN さ 


せる 度 に PEE K す る し か が ない 
ん じゃ な いか な 。 ま だ 、 カ ニニ が 
速く べ て 困る と いう 人 は 、180 行 と 
190 行 の DEF MOVE の 後 、 
SPR ITE( ) の 中 の 第 3 パラ 
メー ター で RND (8) に ノラ 
ス し て いる 数 を 増やせ ば いい ん 
0 で の た 


(編集 部 豆 知識 コー ナー の デー タ ) と ころ で 、 編 集 部 の エイ キチ は 体重 が 約 100 キ ロ ( は か り が 壊れ る の で 正確 な 数 字 は わか ら ア 
な いそ うだ し 、 本 人 も あま り は つき りさ せ だ ぐ な いそ う で す ) で 柔道 部 で す 。 い え 、 別 に 。 


こら ジジ ジジ ジグ 


ンタ 


と コバ ルー/7 


閥 ー 


超 高 層 ビ ル だ っ て の ぼっ て や る 


数 年 前 に 、 一 部 で 大 プー ム と な っ た 
『 ク レイ ジー・ ク ライ マー』 の ポケ コ 
ン 選 だ 。 “の と いう より も 、 偶 然 な ん 
だ けど 、52 ペ ー ジ の M 5 用 還 m あ が 
る 」 の いと こと いっ た 感じ か な 。 

な に し ろ 、 キ ミ ( 令 ) は ビル ディ ン 
ググ クライマー。 今 朋 6! そこ に じ ル 
が ある か ら 」 と 、 理 由 に な ら な い 理 由 
を つけ て 、 高 層 ビ ル 登 項 に 命 を か け 続 
ける 。 


高い ビル ん から まっ きか さま 。 ま た 、 1 
階 か がら や り 直 し だ 。 ミ ス は 3 回 まで だ 
けど 、 ス ペ シ ャ ル を 取れ ば 1 回 ずつ 増 
CVeK の 。 

さて 、 こ の BOGAI の 魔手 か ら と どう 
や っ て 逃げ ば れ ば いい の だ ろう か 。 を そこ 
た で ワー クン ポタ ンマ (に 人 び ル ドリ オド 
を 押す と 、 シ ュ ル ルル ルッ と どこ か に 
2ー ワ デ き る の だ 。 と は ば えん 、 て この ツ 
ー ク は ラン ダグ ん が の て 、 と と に 上 あ が 
わか ら な い 恐 居 よ スリル が ある の だ 。 
途中 、 ス ペ シ ャ ル (\) の 出 て くる こ 


と いう 表示 が 、 ビ ル の 階数 を 表し て い 
る 。 最初 は 10 回 まで 昇り きる と 、1 面 
クリ ア 。 以後 、 ク リア の 条件 が 5 階 ず 
つっ 増え て いく ぞ 。 点 数 は 1 階 あ が る ご 
と に 10 点 。2 面 ご と に 1 回 、 ボ ー ナ ス 
ラウ ンド が あっ て 、 こ の 面 は だ だ あ が 
る だ け で 得点 に な る 。BOGAI も 出る 
こと は 出る けど 、 動 か ず 、 通 過 し て も 
だ いも よう ぶな の 記 。 

エン エン 昇り 続け 、 面 シク リア し て 
oo で 、J8 面 骨 を クリ ア し て し まう と 
つい に PB が ギン アッ クア 。 ヌ え ペ シャ ル 


PB-100 の 横長 の 画面 が ビル の 1 階 と が ある 。 こ れ を 取る 8、 を そこ が は し ー ナ ス と し て 1 万 点 も ちら える 。 編 
2 か 。 だ いだい 相 像 が つ 〈《 だ ろう け と 、 ご に 変わ り 、 ミ ス 残 り 数 が 1 回 増え る 。 集 部 の 人 間 で そこ まで 行っ た の は 誰 も 
画面 の 右端 に 


は し ご は ^H7。H1I3] キ ー で 左右 に 移動 
し て 、 は し ご の と ころ で |5] キ ー を 押す 
と 上 の 階 へ 登れ る の だ 。 

だ が 、 も ちろ ん 、 妨 害 が 入る 。「 う 一 
ん 、 上 か ら 何 か 落ち て くる の か な 」 な 
ん や 彦 た だ キ さ は 、 ま だ ポケ ラン PB 
の 世界 に 入っ て 日 が 浅い な 。 上 か ら も 
の を 降ら せ た い の は ヤマ ヤマ だ けど 、 
それ は ちょ っ と 無理 。 と いう わけ で 、 
妖怪 BOGAI ( 多 ) の 登場 で す 。 


この BOGAI に つか まる と 、 キ ミ は 


出 て くる 1F と か 3F 


ve いこ も は の まま COM 


4 3 隊 よ で 昇っ た なこ ころ で いき な りや られ て し まい まし だ 。 写真 で は よこ わか ら 
な いけ ご 、 落 ちる 感じ が よく ぐ 出 て る ん だ よ 。 


1 な は ら に 葉 の な せき 1 
!』 ゎ ん な 頭 物 = 筆 用 』 ム 8 階 、 家 具 売 り 場 で す …… じ ゃ な か っ だ 、 ス ペ シ ャ ヤル の \\^? ガ 出 まし だ 。 ご こい 
W て 理 ち い の 埋 プ P な 』 。 つ を サッ ツ と 取 つ て 早く 9 階 に 昇 ろ う ! 
* を し 族 や あ 教 B 店 l 
sm て まっ GEAOR| ム ザ 等 
た ね 負 合 に 4 W 
W 邊 デ ( - れ 組 邊 SW 江 泊 沙 朱 抹 流 電 拉 NANA 押 MM New に - 提 朱 まま 
7 る 信和 仙 1 4 気 2 ス ッ キ リ 。 つ い に 10 隊 征服 。 う こん 、 な ん と な く 、 こ の 屋上 か ら 憲 士 山 が 
5 _ ン る も ま ぞ で 』 見 え 5 昌 当 な 気 が ガ する 。 
| 生計 時 (し すま 』 
エミ ニニ ニン ニニ ここ ここ と 


@2 


eo 


10 VHC :R=5W6iN$=" 
しり し 

28 PRINHT "0=UP=LH 
0DER"jin0SUB 約 
iPRINT "COPyYr13 
nt py*iiBOSUB # 
d 

28 PRINT "(C2namac 
ao0n。"iiBUSUB 的 
i 耳 115=WiU=) 
4M PRINT 『TOPI TIRI 
iB0SUB #9iPRINT 
"hy "7N$5 GOSU 
B 級 
3S9 USUH 729WiIF RH 
NM.SiL=INT (RH 
(用 5+5)+1 ) 
69 【F 『- 半 515 「HEN 
z19 
表 FOR だ 1 0 人 肘 
(で )=*HWSNERT Z 
88 FOR ZTT0 お 
(ENHT (RHN 電 11 
HINERT Z 

98 EiF iLi 肝 (ENT 
RHRN き 7)+1)=" 和 ギ " 

1 提 FOR 1 TH PR 
INT DSR ZiH(Z) 
jsNEXT と 

118 PRINT ESR 5" 計 
ESR 8iT5 "FTELS 
Ri 時: 

120 PRINT CSR 5 条 
ESR TE"eTEIIF 
K=MiIF XY 「HEN 

348 

13H FR) ニ "5 
5UB 516 

14 EEF KEY に ET1TEIF ミ 
15PRINT LSR 叶 
(31 ニー1 

150 KEYET3TIIF 
PRINT LSR 品 
H(X)j AgT1 

166 jF KEY=*STiIF H 
(HP T=T11: 
5S=5+19i5UTO 58 

178 ijF KEY=". “5505U 
B 388 

1006 上 -INT (RHN 夫 3)- 
1:TF K=15j 上 呈す 

198 IF DIF 『 枯 
(8iPRINT LESR Ti: 
(Y)1T=Y 寺 上 

709 RUTO 126 

218 PRINT [SR 8jTi" 
FTiiFOR /=9 「B 
8iPRINT CSR 5" 
EAT Z 

220 PRINT CSR AS 村 
jin0SUB 元 


DO 
238 FOBR 


00000H2008800800 


1 10 3: 
R 1 0 3 
66=WID(Y」1) 

246 PRINT DSR お お 5! 
05UB 培 :NEXTY 
iNEXT giB0SUB 

299 PRINT "RINI 也 " 
LLE 有 RiG0SUB 
#9:| に INT 昌 
19+1)*]08 

269 PRIHT "BOMU5IT: 
Uii505UB 9:S=S 
uH ニニ uH が 
8 「HEN 559 

278 IF FRHE (3 に W 

THEN 429 

296 GOTO 38 

290 FOR Z=8 T0 195# 
=* ROUND 
1D(ZT1, 1) 

390 PRINT ESR 415 
WSR お お: 用 


318 FOR 2=16 FH8S 
TEP -iEPRIHT ES 
0 IEIT 
が G05UB 科 

329 PRINT ESR 再 弟 : 
ロ USUB 49:PRINT 
ESR 2 お"REHDY に 
jsBUSUB #9 

KK! 計 1HHHH/) 
:KETURN 

3 秩 FOR た 1 TO SFH 
R 1 「0 5 た" 
00。・ 1 人間 DCY」 1 
iPRINT LSR 生ま 


53J6 BUSUB :NEXTY 
iNET ZPRINT E 
SR ss" iin0SUB 

9 ' 

350 PRINT "Man die 
d。 jin05UB 49: 
上 0-IiIF 8 TH 
EN 44 

3 RUTO SH 

3989 FOR Z=W fU 5: 了 PR 
HTCSR Wi 
0SUB 和 7:PRIHT 
LSR AiHS(X)5 

399 5USUB 7iNEXT Z 
AINT (R 有 NH 幸 7) 
+1 

4M9 FUR /=8 TH 5iPR 
jiHT LSR RiHS(X) 
ii:50SUB 7iPRIN 
TCSR 3 "95 

418 ROSUB fiNERT と 
iRETURN 


FU 429 PRINT “BONUS RU 


UNDI"i60SUB 約 

iPRINT "〈BOGNI〉 

ST0P、"ii60SUB 

438 PRINT ' REHDY 
"ii60SUB 約 :K= 
1iR=1iY=fT=116 
OT0 69 

449 PRINT "5HWE 0 
ERIiiG0SUB 約 

456 PRINT "SCOREE 
Sii50SUB 的 

469 IF S)RiRsSPRIN 
1 * TOP SCOREI' 
iiG0SUB 約 :1WPU 
1 "NME:",NS 

479 INPUT * TRY HGH 
IN'3 

489 1F 人 = THEN 2 


H 

499 IF ="NPIEND 

599 BUTO 4 

519 PRIHT ESR 1j"SP 
EEIHL "iiG0SUB # 
5iFHR 1 TH 7 

528 PRINT LSR 3 
EXT ZIPRINT 
LSR 1j "ONE NHN* 
js5USUB 押 

3 時 ()= ニ "HL 
=l+1 

3 特有 R 1 TH お 根 
NT [SR ZiH(Z) 
jiNEAT ZiRETURN 


3J9 PRINT "(BRI) 
say。 ji5USUB 
:PRINT ) WEU 
P EPSnUSUB 
59 PRINT "BODNUSI 1 
9 : ロ USUB 9 
:5=5+1 0680: OTD 
4 


Pe 
16 FOR B-W T0 1588: 
NEXT 9iRETURN 
PT 
18 FOR =8 TO 1WEN 
EXT BIRETURN 


P 


-。 18 FOR 0=8 T0 28IN 


EXT diRETURN 


P9 
19 FUR 9 に WiH Z00 
NEAT BPRINT KR 
EiURN 


>/, 
7877 た 


還 変 数 リス ト 

R…… ハ イス コア 
N$…… ハ イス コア ネー ム 
O.Z.V…… ル ー プ 用 
M…… ラ ウン ド 数 

(PPP リン: 

〇 O…… フ ライ マー の 人 数 
X…… 自 分 の 位置 

Y 8 敵 の 位置 

T…… 現 在 の 隊 数 


K…… ボ ー ナ スラ ウン ド 判 定 用 
L…… ス スペシャル の ある 階 


U os.3 ポ ボー ナス 用 
一 プロ グラ ム の 説明 
10-~ 50 初期 設定 、 デ モ 、 ス 
ベ シ ャ ヤル 設定 
60 屋上 判定 
70- 90 画面 設定 
100-120 キャ ヤラ ン 夕 表示 、 接 
扱 判定 
130 スベ シャ ヤル 判定 
140-170 キー 入力 
160-200 相 ま の 動き 
210-260 ラウ ンド クリ ア 
290-330 ラウ ンド 表示 、 初 其 
設定 サ プ 
340-370 フラ イマ ー 死 亡 サ プ 
9600cs400 5 ウェー ッ サッ ツ 
420-430 ボー ナス ラウ ンド 表 
示 、 設 定 
440-500 ゲー ム オ ー バ ー 
510~540 スペ シャ ル サ プ ブ 
550…500 GIVE UP、 ボー ナ 
メ 
ビ 6ー ビ 8 ルー フサ ザ サブ プ 
一 チェ ッ フ ポイ ント 
まず 、 自 分 は 最初 う 人 いる が 、 
途中 で 追加 され る の で 、 ぜ ひ 、 
送 中 表示 が ザ ほ し い 。365 行 に 
PRLNLIT Ma 5 
Oi: :GOSUB #9 
これ を 入れ る と 、 残 り ス テッ 
プ 数 は つ し か な い の で 、 改造 す 
る に は 表示 部 分 を 簡素 化し て 、 
ステ ッ プ を 稼ご う 。 1 面 フ リア 
ご と に ら 階 ずつ 増え る の は ちよ 
つと きつ いね 。 60 行 の = ニ M* 
ら 十 5 ら を 、w づこ に し て みれ ば 3 
障 ず つ 増え る よ 。 (だ けち ゃ ん ) 


ざき 


に し ゴ ッ /9/ テ ニーム クン ク ク ググ 


ジェ ッ ト ビ ー ト ル か ガ ら 出 て くる ビー ム は 4 マス まで し が ガ が 届 が な い 。 


計 9 い 1C 生 な ら 、 


ム お つっ と 一 、 う まく ビー ハ を ぶち あて だ ぞ / 


が よく ぐ 出 て いる ね 。 


4 手ごわい 敵 と は 一 発 必 中 の ミサ イル 
で 戦う 。 やつ ばり 、 バ 2 ? は こわ いも ん 
ね 。 で も 、 ミ サイ ル が あと 1 発 に な つ 
て し まつ だ た だ 。 選 細い な 。 


mW た れ な 5 閣 す 導 na 
た ば 1 
て ぼ 昌 
W 5 通 く の 
1 ブ が 家 っ 信和 
邊 グ 届 に ご ん 校 | 
W 3: - く で に 「 
| ム た 加 ぶる 通 邊 
5 3 全 ] し 
lm 過 中 補 の ろ 思 
か 回 区 |( 田 は い 
W か 域 園 ce 邊 
ョ か 談 外 バ き l 
| 拉 の が 和 ※ ス へり 「 
# 
ョ m 人 ん 募 と vN で も 受 』l 
ョ で 呈 が ? 生 入 』 
4 で て も で 
ここ CCC2ZCCC て ここ“ 


ざ 


ッ ト ビ ビー トル vs. 怪 物 軍 団 


も っ と 必 7/ 


ジェ ッ ト ビ ー ト ル が 離陸 する デモ 画 
画 の つい だ 。 ス ペー ス ・ シ ュー ティ ン 
グ ャ クー ム 。 

この ジェ ッ ト ビ ー ト ル の キャ ラク タ 
が な か な か うま い 。 不 等 号 の “>” と 
矢印 "っ つ ” を あわ せ だ だ け で 、 い か に 
も それ っ ぽく 見 えた ちゃ う 。PB キ ャ ラ 
クタ ・ デ ザイ ン の シブ い 典 深き を ふと 
RC で し まゆ まだ 。 

キミ の 乗る この ジェ ッ ト ビ ー ト ル に 
向かっ て 、 次 々 と 出現 する 怪獣 た ち 。 
全 や O や …… 。 [1I31 キ ー で ジェ ッ ト 
ビー トル を 左右 に 操作 し 、 ビ ー ム (1⑥) 
や ミサ イル (⑮)) で 怪獣 た ち を 全 減 る 


CK 
怪獣 軍団 は 全部 で 5 種類 。 怪獣 に よ 


っ て 強 き も 違う ぞ 。 弱 いや つ な ら 6 ら 、 ビ 
ー ム を 2 発 撃ち こめ ば ダウ ン し て し ま 
うけ ど 、 強 いや つ に な る と 4 発 必要 に 
な る 。 それ に 、 強 い 怪獣 の 攻撃 は 、 ま 
た 特に 激しい の だ 。 も ちろ ん 、 得 点 も 
倒し た 敵 の 強 る に 応じ て 高く な る 。 
怪獣 か ら の 攻撃 は ~*” で 、 怪 獣 の 
強 さ に よっ て 攻撃 頻度 が 違う 。 明 い 相 
手 な ら 、 あ まり 攻撃 し て こない の て 近 
づい て 攻撃 で きる けれ と ど 、 強 いや つ は 
縮 戒 し な が ら 近 づか な いと だ め 。 ジェ 
ッ ト ビ ー ト ル の ビー ム に も 決め られ た 
射程 距離 (4 マス ) が あっ て それ 以上 
離れ る と 効力 が な く な る の で 、 敵 と の 
距離 の 取り 方 が 、 こ の ゲー ム の ポイ ン 
トド ト の ひと つう なの だ 。 

ミサ イル は 、 ビ ー ム と 違っ て 一 発 必 
中 。 撃 て ば 必ず 相手 を 倒せ る 。 だ が だ 、 
ミサ イル は ジェ ッ ト ビ ー ト ル 1 機 に つ 
き 、。 久 発 ま て し が 使え な い の て 、 こ こ 
ぞ と いう と き に 使わ な いと も っ だ いな 
い 。 ミサイル の 残り 数 は 、 画 面 上 の G 
RA が つい て いる と き が 2 発 、RAD の 
と き が 1 発 DEG に な る と も うな い 
Dee と いう ふう に 表 る れる 。 

あう 。 だめ だ 。 さこ の の に は か な わが 
い 」 と か 「 こ ん な ザコ な ビ 相 手 に 

く な い /」 て な と き は 、 [14I で 脱出 する 
GE 二 の 6 6 

次 々 に 出 て くる 怪獣 を 160 頭 や っ つけ 
る と 、 つ い に 人 怪獣 軍団 が ギブ アッ プ す 
る の だ 。 怪獣 の 名 前 を 作者 は 特に 決め 
て な いけ れ ど と 適当 に 名 前 を つけ て 遊ん 
で みて は どう か な 。 


PR 
1 PRINT "THE 出 約 
TERUPiNODDOE 5:B 
0SUB 9:G0SUB # 


9 

は っ 
*A=25/=45 時 11:E 
nH エイ ロニ 
[$=H$ 

18 PRINT "BEST sco 
reiRi py 6: 
:5OSUB 維 

15 PRINT CSR 1j"fa 
ke UffEETiiB0SU 
B #iiEOSUB 約 :6 
USUB #2 

Z0 IFKEY=Y1TIIFW 
ュ 11A ニ A-1 1/ ニ AT/ ミ 
し $=H$ 


21 IF KEYE'YIFS 


293 0 ニ AT1 5/ ニ Aー1 
し $=H 
2 jiF KEY=" 和 550SU 
B #2:P-P-16 
73!F KEY="6"iU ド 
-* ロ に 1:50SUB 8 
74 IF KEY="5Y5IFF 
2 間 5 JYU 和 に 
=hsB0SUB 53 
zo PRINT ESR 757 
ESR 7 ESR 
YiD お CSR 5 し 5 
39 5USUB 3:HODE 
+4iRUTO 28 
59 IF 65 JTS: 
KiL=AT27EEF 7 
5jJ=11ETF X=185 
RETURR 
31 【F 4 8 
K=-1i=8-1iF W 
て 科す FX=5R 
EIURN 
2 BHTO 55 
3 [3K=1 し = 
2E IF =10iRET 
URN 
34 IF 64:K=-1 
= メー1 5 [FR= 電 5RET 
URH 
3J =F-} 
35 FOR 冒 L 『0 JST 
EP KiPRINT ESR 
- 肌 05iTF 時 Yi 
B-fH IF 日 3 は 9+ 
1 
3! に 中 SUB 59 
5=YE サ RSUT も 5 
P=P+S# 邊 : SUB 
的 :50SUB 2:RET 
URN 
39 EAT 骨 


39 FOR 時 1 10 JST 
EP KiPRINT CSR 
iNET 

59 RETURN 


癌 

18 『=INT (RN*6)+ 
5 =INT (RRHS 
411:50SUB TIRE 
TURN 

11 4="f"i ロ =2: 昌 2 
RETURN 

1 009" 還 Ei ロニ 2 に 2: 
RETURN 

1 9040 PIG=3: 時 3: 
RETURN 

14 0 に "=4: 時 5 
RETURN 

15 04-"mYiH=4: =4: 
RETURH 


P2 
S PRINT LSR iL$5 
5 jiF RWz1iIF [を 
j=255OUTO 2 
3 jiF [*=B$5PRINT 
LSR Tj" "finOTO 
3 
18 PRINT CSR -1" 
=*5 in0SUB 境 :PR 
INT LSR X-23 "=" 
jsBUSUB 替 
29 FOR 時 %-1 TO 9: 
PRINT CSR 証 "= 
35LSR 朋 -15 7 の: 
:B0SUB 8:HEXT 
は ばら ) 
38 FOR 誕 X TO 8 ST 
EP -,5S:PRINT CS 
R 語 S5ESR 時 2: 
昌和 日 、 
EXT 上 
4 Xs[$=H6:ROSUB 
#1:RETURH 


P5 
1 T=RHNIF T>1 
.6-0/109:50SUB 
-8iB0TO 18 
5 FiY=YtSBH (.5 
-RRN ま IIF Y)115 
"=11 
6 iF 85Y=B 
8 PRINT CSR 凍 "“ 
iCSR Y5093CSR 
itiRETURN 
19 IF YAXjIF YzXt1 
iRETURN 
15 K=S6N (%-Y):j=Y 
相 


16 IF SEF KJ 
= 

7 Y28iHF 7 は 
=11 

ZWFOR 星 YHKfOJ 
SiEP KiPRINT 55 
ド 栖 」HL. 

2o【F 人 IF 凡 1 
ドコ 計り) 三 ) 
gUSUB 約 iE=E-1: 
ag= 間 F ニ UTU 35 

38 典 XT 骨 FDR 庄 Y+ 
K IO JSTEP KiP 
RINT CSR 十 ) 
iNET NH 

33 FE=W THEN 訂 

彰 RETURN 


PS 

18 FOR 衣 5 TO 11EF 
DR 遇 STD 8 STE 
P -iPRINT CSR 
則 )1L5R NT(P 
jLSR Wi 

15 MERT NINEXT 旧 

z9 FOR 販 5 TOD iiF 
UR NE5S TUD 8 STE 
PF -#iPRINT LSER 
且 LESR Ni 『* 
LLSR 5 

25 NEXT NINEXT 過 1 
「 169ipOSUB # 
9i5UTU 4 

38 RETURN 

得 PRINT EGR 725 " 
WE PU score"j 
PPRINT CSR 25" 
fHE END* 


PP 
3 n0SUB 約 
18 PRINT " 胡 尋 0OVE 
R SCOFe [EEB5 
Pi isBOSUB #9: 1 
F RaP THEN iM 
79 R=PiPRINT "You 
_ are 肛 的 則 NTER 
5。。。 sn ロ USUB 
9i ほ HPUT "Name『」 
$ 
39 PRINT "*Try H9a 
ini*“"sRHTU 境 


P8 
19 FOR に 1 TO 8iNE 
ai IEiREIURN 


P9 
FUR =1 『 有 2000: 
HEXI IiPRINT ER 
EFHRN 


画 変 数 リス ト 

AS,BS,C$…… ピ ビー トル の キヤ 
2 

X…… ピ ー ト ル の 座標 

Z…… ビ ピー トル 消去 の 座標 


W…… 英 消去 の 座標 

E…… ビ ピー トル の 数 

F…… ミ サイ ル の 数 

ロ とい 得点 

〇 …… 田 し だ 敵 の 数 

R…… ハ イス コア 

お …… ハ イス コア ラー の 名 前 
Y… 敵 の 座標 


T…… 敵 の 攻撃 移動 決定 用 
D お …… 敵 の キヤ フランツ 


(Ons 机 の ベタ ミナ 
日 …… 得 点 係数 
U り お …… 味 訪 攻 撃 キ ヤラ ン ツ 、 
勝ち 残 つ を キヤ フツ 
人 e) pwrwScre 攻撃 力 
poo に = 二 り イル の 
始 点 、 終 点 の 座標 


に nv ルー ノ 用 5 選 ビ 
S…… 旧 発 パ ツ ター ン 始 点 座標 
V…… 勝 つ を キヤ ラダ 用 座標 
田 プ ログ ラム の 説明 
本 具 。 。 

の 5 3226 に 0 

期 設定 

20-24 キー 入力 

25, 5660 画面 表示 

30 敵 行動 ルー チン へ 、 


ミサ イル 躍り 設定 
50-55 攻撃 用 条件 設定 
P 1 敵 の 設定 
に 脱出 
に 
1 英 行動 決定 
ら ~ ご 秘 動 
10 一 40 攻撃 


P ら 5 旭 発 、GIVE UP 
ビン グー ム ス オー バー 
ビ お 8, ゼ ら ルー ノ プ 
一 チエ ェ エッ クボ イン ト 

残り ステ ッ プ 数 ガザ 70 ス テッ ツ プ 
と 残り 少な い の で 、 大 き な 必 造 
は 難し い 。 そ こ で 、 敵 の 種類 を 
増やし て みよ う 。 1 の 10 行 
「=I NT (RAN#tw ら ) 十 
1 1 を xO6 に こし て 、16 行 に は 、 
D お = \@? テグ: 昌三 1 
NT (RAN#w141) :R 
ビ に さり RIN じ D に 5 行 【 
D お = ニ バ @? : 三 5 の w 昌 : 
PRINT “BONUS = 
0 EeeoOS り UB #S 
と し て みよ う 。 “@” の ボー 
ナス 怪獣 ガ 出 て ぐる よ 。 

(だ けち や ゃ ん ) 


し の / 


レゴ @/@/ 記 = ニム エン ン ン ン ン ン ン 


地獄 の 5 面 を キミ 


は 越え られ る か 


FOR PB-00.o:/PB ッ 5- 


の 遊記 


ポケ コン 担当 の た けち ゃ ん お すす め 
の 戦車 戦 ゲ ー ム 。 

P B の 表示 画面 は 、 キ ミ の 戦車 か ら 
の ぞい た 外 の 景色 だ 。 

1 キー で 左 の 景色 を 、 |3| キ ー で 右 の 
景色 を 見 る こと が で きる 。 つ まり 、 キ 
ー の 向き と は 逆 の 方 向 に 景色 が スク ロ 
ー ル する っ て わけ 。 ま 、 こ の 手 の ゲ ー 
ム に は そう いう 方 式 が 多い の で 、 や っ 
て みれ ば だ いだい わか る は ず 。 

景色 の な か に ちら ほら と いる 敵 は 、 
全部 で 4 種類 。 ま ず 、 1 面 で 出 て くる 
の は 、 ホ バー タン ク グ (へ ) と 地上 基地 

(一 )。 ホバー タン ク は ちょ こま か た と 動 
きま わる の で 、 な か な か 手こずっ て し 
まう 。 ホ バー タン ク を うま く 画 面 の 中 
央 に と ら え て 、 較 キ ー で ビー ム 発 射 。 
た だ し 、 こ の ビー ム が 地上 基地 や その 
残 が い ( 三 ) に あたる と 人 送 に は ね か え 
っ て き て や られ て し まう の で 注意 。 ま 
た 、 ホ バー タン ク グ に 向け て ミサ イル を 
撃っ て も 効果 が な い ぞ 。 

地上 基地 は 動か な い の で 、 攻 撃 は や 


きる しい 。 図 キー の ミサ イル て 破壊 し よ 
ッ 

地上 基地 を 全て 破壊 し 、 ホ バー タン 
ク を 面 数 士 1 だ け 撃 破 す る と 、 面 クリ 
ア 。 2 面 以 降 、 地 上 基地 の キャ ラク タ 
が 変わ り 、 ど ん どん 大 きく 建造 さ れ て 
いく の が 。、 ち っ と もし ろ い ぞ 。 
3 面 か ら は 、 破 壊 不能 の バキ ュ ラ ([ リ 
が 出 て くる 。 こ いつ に は 、 ビ ー ム も ミ 
イル も きき め ゆな し 。 それ と ころ が 、 
ビー ム を まち が えて 撃っ て し まう と 、 
逆 に や られ て し まう の だ か ら 、 決 し て 
る か ら わ な いこ と 。 

画面 右 に 出 て いる 数 字 は 残り エネ ル 
ギー。 こ こ が 0 に な っ て も 、 キ ミ の 戦 


BY 井上 和紀 


車 は 自爆 し て し まう の だ 。 3 機 や られ 
る と 、 ゲ ゲーム オー バー。 

と この で 、 S 面 まで 付 る だ た ギ ミ さ は 鶴 
妙 な こと に 出会う だ ろう 。 画面 に は 地 
上 基地 が 1 つも な く 〈 く 、 全 面 、 ホ バー タ 
ンク ば は がり 。 と ころ が 、 この ホバー タ 
ンク を ビー ム で や っ つけ て いる うち に 
な ぜ か ヵ 突 然 自 爆 ……。 フ ッ フ ッ 、 こ の 
面 は 「 地 獄 の 5 面 」 と 呼ば れる 芝 ろ し 
上 人 が の だ 。 実は 、 ホ パー タン ク グ の だ な 
が に ダミ ー 教 車 と 人 し だ パ キ ュ ラ が ゆい 
る の だ 。 バ キュ ラ に ビー ム で きか ら え 
ば 自爆 は 当然 な の だ 。 

ゲー ム ・ ス ター ト 、 リ プレ イ と も 何 
か キー を 押せ ば は じ ま る ぞ 。 


4 石 の カツ ンコ の な ガ が が ガ エ ネ ルギー 表示 。 あ と 少し し か が ない 。 は や く こ の す ば し こ 


いや つ を 倒し て 、 面 クリ アク し な ぐつ ちゃ 。 


^ ム つい に 出 だ 、 恐 怖 の ら 面 。 一 見 、 ご く ふ つう に 見 える と ころ が か えつ て こわい 。 
どれ が ガバ キュ ラ で 、 ど れ が ホバー タン ク か が か 、 け つけ の け 一 の も 中 。 


人 4 ほお ら 、 い わん こつ ちゃ な い 。 パ バキ ユラ を ビー ム で 撃つ て し まつ だ 。 う 一 ん 、 


今度 は 、 こ と ・ し ゃ みせ ん ・ あ ぶら むし で 行こ ご う ガ な 。 


間際 、 ボケ コン は キー が ち つ ちゃ いか ら 、 ゆ み の 太 い 指 で は 、 と つて も 不利 だ と 思う ん だ 。 こ の ゲー ム は 、 わ り と 熱中 し まし だ ( 結 
電 2 生 果 は 20 分 ぐら いや つて 、3 面 まで が ん ば つ だ ぞ 。 み ん な ほめ だ だ えて くれ エー。) OK を 見 だ あと は 満足 で し だ 。 
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B お …… 表 示さ れる 背景 、 ミ サ 
イル キヤ ラン タダ 、 地 上 
地 破壊 キヤ ラフ 
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一 プロ グラ ハム の 説明 
PO 
10- 40 初期 設定 
9 や 220 メイ シン ルーチン 
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150~160 面 の リア 判定 と 
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200ー2Z20 グラ ッシュ 
300^920 グー ム オ ー バ パー 
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10~ 30 ビー ム 発 射 と 命中 
40~- 60 ビー ム が は ざれ だ 
と き の 処理 
田 チ ェ ッ フ ボ イン ト 

残り の ステ ッ プ 数 は フス テッ 
プレ カ な い の で 改造 は 難し い 。 
そこ で ら 面 は 難し い の で 、 自 分 
を 1 人 増やし まし よう 。 

P2 の 60 行 V= の の 後に : し 
ー し 1 を 入れ よう 。 タイ ム を 
増やし だ い 人 は 、P0 の 30 行 と 、 
220 行 の T の 値 を 増やし まし よ 
う 。 (だ だ レニ 9 まで ) そ れ か 
ら 、P0 の 40 行 と 、P4 の 30 行 
の RAN#*3 の を * 15 に す 
る と 、 敵 戦車 の 出現 男 囲 が 半分 
に な る よ 。 (だ けち ゃ ん ) 


ぎ Z 


シゴ g/@/= こ ん シン ン ン ン ン ング 


3-D タ イフ プ の ボケ コン 迷路 


ぐ 、 遊び 万 分 の 位置 情報 が 少な く な る の だ 。 最初 路 の 状態 、 真 中 あたり が 迷路 上 の 自分 
は レベ ル 1 で や る で し 。 絶対 / (経験 の 位置 、 右 端 の 矢印 が 迷路 に 対し て 自 

ポケ コン 版 、 3 -D 迷 路 。 か ら の アド バイ ス ) ま 、 レ ベル 3 な ん 分 が どの 方 向 を 向い て いる か を 表し て 

RUN さ せる と YOKO ? 1 一 34)“『 か で や る と 、 な ぜ こ の 迷路 が 地獄 な の いる 。 こ れ を 手がかり に 迷路 を 脱 ける 

と きい て くる の で 、 1 -34 の 数 字 を 入 か が 体 で わか っ て き て し まう の だ 。 の だ 。 出 日 は 迷路 の 右端 の どこ か に 1 
力 。 こ の 数 字 が 迷路 の 大 きる を 決め る 画面 の 両端 で チラ チラ し て る の は 、 カ所 ど だ け あ いて いる 。 右 を 向く と き は 


の だ 。 当 然 、 大 きい ほう が 難し い 。 縦 。 意味 が な い の で まわ され な いよ うに 。 [8、 左 を 向く な ら [|、 そ し て 前 進 は 5 
の 大 きる は 12 ド ッ ト と 決め られ て いる 。 左 か ら 3、4.5 マ ス に 自分 か ら 見 た 通 の キー だ 。 詳 しく は 写真 説明 を 見 て ね 。 
を の 後 、 約 8 秒 た つ "MAKING NOW 
/? と 表示 きれ て 迷 員 作 成 に 入る 。 こ 
れ が 結構 長い けど 、 し か た な いね 。 大 
きか な 迷路 を 指定 する と 、 最 高 で 7 分 か ( | ' ーー 
か る を そう な の で 、 マ ン ガ で も 読も う 。 15 と は まだ 思い きつ た も の 。 や っ つ ぱり 、 は じ め の うち は 2 か 3 くら い が テ キト 


迷路 完成 後 、 レ ベル を きい て く る 。 ー か 、 と 。 迷路 作る の に 結構 時 間 も か か る し ね え ……。 


レベ ル が 高い と 、 画 面 か ら 得 られ る 目 


月 見 用 肌 上 N 放 Wo MA すす 
1 党 
に 


ー 
叶 
で 
さ 


4 通路 の 状態 は は ーD 風 の 表示 。 黒 こ ベベ タツ と 塗 つ て ある の は 壁 。 白く 抜け て いる 
の が 通り 道 。 今 、 目 の 前 と を 手 に 行け る 。 地図 は 上 下 半 分 ずつ を 横 に 並べ て いる 。 


村 


ot ど AC 短 鞭 "ポー で 


識 下 一 VY コン へ J 
| 半生 器 当 S③ ご の いい ロ ー の で ニー 
記さ ここ ここ 


剖 人 Wm 補 CV キー ミ 叶 


4 や つと 迷路 の 途中 まで きだ 。 今 、 迷 路 の 出口 の ほう を 向い て いる と いう こと が 、 
右 の 矢印 で わか る 。 ち よう ど ま つ す ぐ の 通路 も や ある し 、 ひ よ つ と し だ ら ……。 


和 
|』 4 ム や っ つた だ 、 迷 路 脱出 | な ん て 、 こ れ は イン チキ 。 ホ ント は 、YOKO を 1 に し だ 

aa。。。。 ュ 。 っ 。 っ 。。 ン ) や つつ で. 迷路 を 脱出 し だ ん だ 。 結 局 、YOKO15 の 迷路 は 放棄 し て し まつ だ の だ 。 
田 変 数 リス ト 況 配列 ・ Y…… ル ー プ カウ ンタ お よび Y ・ タ 

(迷路 作成 ルー チン ) ・ A( )…… ジ ャ ンプ 先 ワー ン 配 列 、 軸 ポ イン ・ U…… ジ ャ ンプ 完 ワ ー ク 配列 用 
P…… 迷 路 の 横幅 ・ 浅 字 の 最大 値 の / パ ッ フ ・ Z…… 入 ロボ ポイ ンタ ・ ワー ン 基 字 

MS$( )…- 迷 路 作成 ワー ク 配 列 ・ アッ プ 用 ・ T… ス テッ プ カ ウ ンタ ・ (迷路 進行 ルー チン ) 

B( )…… ジ ャ ンプ 先 ワ ー ク 配列 * X…… ル ー プ カウ ンタ お よび X ・ V, W…… 迷 中 分岐 点 サ ー チ 用 ・ W…… レ ベル 用 
X$( )Y$( )… 迷 路 の 通路 状 : 二 ポ イン バッ フク アップ ポイ ン : X, Y…… 現 在 地 ポ イン マタ 
し プン 重 間 KN、 くやし ー つ | まわ り の 人 は 、 そ ん な に 難し く な いつ て 言う り だ けど 、1 回 目 で き な は こく て パス し て し まい まし た 。 ポケ コン 


9 得 て さ い か ら 目 が 臣 れ る けど 、 ど こ で も や れる 手軽 さ が い いね 。 め み も ポケ コン 買い だ いよ ぁ ー ル ! 
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横幅 、 レ ベル 、 回 数 が 考慮 され 
だ 得点 が 表 示さ れる よ 。 
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作者 か ら 送 られ て きた だ 顔 写真 を 整理 し て いて 、 フ オー カス に の り の そう な 写真 を 発見 。 あ の 禄 田 ま りこ さん が ガ 号 つて いる の だ 。 を の 
思わ ず ス ペー ス の お き て や ぶり を し て 、2 人 の 顔 を の せ て し まつ た だ 。 
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グイ ー ン と 敵 が 人 迫っ て くる 、 ズ リリ 
ング な 宇宙 戦争 ゲー ム 。 

PC-1500 の 表示 画面 の 中 央 に ある 、 
中 / で 仕切 られ だ た と ころ が スク リー ン 。 
その 真中 に ある の が 照準 だ 。 

[pgIAI び スタ ー ト する と 、 ス クリ ー 
ン が 現れ 、 4 種類 の キャ ラ が 遠く か ら 
だ ん だ ん 形 を 現し て 〈 る 。 敵 に よっ て 、 
攻撃 を 変 た な けれ ば な ら な い の で 、 結 
構 苦 労 し て し ま う 。 移動 は [1I3I で 、 を 
れ ぞ れ 反 対 方 向 に 背景 が スク ロー ル す 
る 仕組 だ 。 

登場 キャ ラク タ と その 対処 方 法 を 説 
明 し よう 。 
① 基 地 …… 近 づく と 白い 四角 か ら 円 に 
な っ て くる キャ ラク タ 。 これ は 味方 の 
エネ ルギー 補給 基地 で 、 敵 と まち が え 
て ビー ム を 撃っ て し まう と 、 逆 に 自爆 
し て し まう 。 照準 が 基地 に あっ た だ ら 、 
すばやく [キー。 エネ ルギー が 10 プ ブラ 
大 され る 。 まだ 、 だ 有人 べ よ びそ も いい の 。 
な お 、[5| キ ー を この と き 以 外 に 使用 す 
る と 自爆 する の で 注意 。 
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② 限 石 …… 近づく と 黒丸 、 黒 四角 、 失 
丸 と 大 きく な っ て くる キャ ラク タダ 。 よさ 
け て も いい し 、 鶏 準 に あわ せ て ビー ム 
(2 キー) を 発射 し て 爆破 し て も いい 。 
ビー ム の [21 キ ー も 、 こ の 随 石 と 後 で 説 
明 す る ミサ イル を 陵 準 に 捉え た と きだ 
け 使 用 可能 。 その 他 で 使用 する と や っ 
ば り 自 爆 す る の で 注意 。 

③ 宇 宙 船 …… 2 面 以降 に 出 て て る スタ 
ー ウ ォ ー ズ 型 の スペ ー ス シッ プ 。 これ 
に は ビー ム も 歯 が 立 た な い 。 撃つ と 自 
欄 し や し まう の だ た だ ひだ ずら 、 だ 


太 に か わす し か な い 。 ' 
ミサ イオ 2 3 面 以降 に 出 て くる 、 


00062 


4 画面 記 


UTE 


& 本 の アン シテ ナ の つい た キャ ラク 。 
これ は 、 よ け て も ダメ 。 ミサイル て 好 
た 疫 だ な い ょ や 5 られ て し まう の だ 。 

も う ひ と つ 、 キ ー が ある 。 |4| キ ー の 
バリ アー だ 。 4] を 押す と 、 表 示 パ タン 
は 消 を て し まい 、 危 険 を の が れる こと 
が きる 。 だ だ し 。、 エネ ルギー が 1 上 四 
に つき 10 減 っ て し まう の だ 。 エ ネル ギ 
ー が 10 以 下 の と き は 無効 。 

ダメ ー ジ を 7 回 受け る と ゲー ム オ ー 
バー。 得点 が 9999 点 を 越 を る と ゲー ム 
が 終了 する 。 エ ネル ギー が 増え つづ け 
999 に な る と 、 ボー ナス 500 点 が 加算 る 
れ 、 エ ネル ギー は 100 に も どる の が だ 。 


志 レ し レ て も いい る 。 今 、 スク リー ン の 中 央 に ある の が 了 石 だ 。 


4 待望 の エネ ルギー 補 結 基地 。 す ば や ぐ [5| キ ー を 押 そ う 。 で も 、 し ぐ くじ る と 、 ダ 


メー ジ が ガ 1 回 増え て し まう か ら こ わい 。 


4 お お つっ 、 ミ サイ ル だ 。 こ いつ は ビー ム で あて な いと だ め 
め / わ 、 ま に あわ な い 。 レ し ょ よう が な い 。 バ リア ー / (と いつ て |4| を 押す ) 


つか り の と [| の キー を 押し て い だ ふ > 


4^4 バ 、 パ リア ー も ま に あ わ な か が つ だ …… (と 残 竜 が つて 指 の 先 を 見 る と 、 指 は レ 
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ポケ コン に 、 慣 れ て いな い め ゆめ み は 、 上 準 に 入 つ を も の は な ん で も か ん で も 、 め だ ら や つ だ ら 撃 つて し まう つう から 、 す ぐ 死 ん で し レ 
まい ます 。 これ か ら 練 習 し て 、 腕 を 磨く ぞ お < ご 。 
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フ ・… 如 数 発生 用 
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N-…260 行 ふり わけ に 利用 
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A お … ボ 出現 キヤ ラク 
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第 の 面 の 出現 キヤ ラ 

の 選択 


Heg 信 (4 
02 と 27 


31 3/ 


500 一 530 


540-560 


IF Y$="N"CLS・ 


590 一 640 


650 一 710 


600 一 660 
6865 一 900 
910 一 960 
970 一 1050 


第 づ 面 の 出現 キヤ ラ 
の 選択 

第 4 面 の 出現 キヤ ラ 
の 選択 

ピー ム 発 射 後 の 処理 
敵 爆発 

アム ソン 
ゲー ム オ ー バ ー 


蝶 チ ェ ン フク ボイン ト 
ミサ イル は 、 了 避 より も 難し 
い の に 得点 は 同じ な の で 、 


8985 


IF R=31LE 


T S=S+3 の 9 : GOTO 


1 の 5 


と 入れ ね れれ ば 30 点 プラ ス と な り 


ます 。 (だ | 


ナ ち や ゃ ん) 


ク 7 


シグ ググ 多 ク popgr- っ ge 


LNptSY 
SWRLLDMB 
BY CE 
SSCHD1 


発売 元 三 徳間 書店 < テク ノ ポ リス > 販売 元 三徳 問 コ ミュ ニケ ーション ズ な お 、 お 問い 合わ せ は 毎日 、PM3.00 て 5.00<( テ クノ ポリ ス > 谷 03(295)4610 ま て 。 


担当 の (和み で いつ す / 


は レ め まし て! プ ァ ミリ ー コ ン ピ 
ュー 人 タ 大 好き 娘 の ゆみ で 一 す 。 テク ポ 
り 72 月 号 を 読ん だ 君 な ら 、 知 っ て る よ 
ね 。 あ の よー ご と 巡 子 同然 と 言わ れ て 
いる ひょう きん 人 間 な の だ ん スポ ボー 
ツ と ドラ イズ と いた ずら が 、 だ ー い す 
き ツ ⑦ ボー イス カウ ト 活 動 も レ し て る ん 
だ で お ー っ 。 ゲー ム の ご と だ け じ レ じゃ な 


今月 りお て まみ 


上 % つ ちの 冗 

ある 日 の 夜 私 が 往 て いる と 、 と な り 
の 部 屋 び カチ ッ 、 カ チッ と 、 不 気味 な 
次 が 半 に を て そ き た だ た. 「 は て な ん の め 弟 
だ ろう 」 私 は 不思議 に 思い 男気 を 出し 
て 起き よう と し だ 。 する と 突然 ! 「 な 
ん だ こい つ /」 と 誰か が と な り の 部 屋 
で きる けん だ 。 私 は びっ くり し て し り も ゃ も 
ち を つく 《 と こ だ っ た 。 あ っ そう いえ ん は 
うち に は 、2 パ ソコ ン が あっ て 、 今 日 は 
見 が アド ベン チャ ー を 解い て いる ん だ 
っ け 。 ア ド ベ ベンチャー を や っ て いて 、 
お ね から な いと 交 旬 を 言う ラ ト 。 わ か っ た だ 
と き は 「 ま か せ て くれ 」 と か 、「 オ レ っ 
邊 天才 だ が 」 が と 言 ろ だ りす る お か 
し な 見 で し ょ 。 PRINCE (北海 道 ) 
広 確 か に お か レ し な お に 一 ちゃ ん だ ね 。 
で も ゲー ム な ん か や っ て いる と き 、 ひ 
と り ご と っ て 言っ ちゃ うん だ よね 。 ち 
な み に ゆ み の ひ と り ご と は 双 音 に ちか 
いも の だ も ん ね 凛 


クィ 


ぐ 、 み ん な の 悩み ご と や 、 イ ラス ト 、 
身 の ま わり に 起こ っ た お も し ろ い ご と 
な ど 、 な ん で も 送っ て /  。 
今 な ら 即 、 採 用 し ちゃ う で 。 " 蘭 
待っ て る か ら ネ / 
まず は 、 ご ん な お 便り が きま し た 。 “ 

PRINCE こ くん の お 兄さん 報告 は 3 つ ーー 
まで あっ た ん だ けど 、 そ の うち の 7 つ ざ (に 


| | 
ヽ に の 邊 W? 
@$ 
KS 
どー し て 知っ て る の ど ”” 
4 北海 道 ・PC- こ ぞう 尋 な ん か すっ ご く 雰 囲 気 が 出 て る 4 コマ マン ガ ね 。 ホ ント に た けち ゃ ん 


て 、 こ ん な 感じ の ちょ っ と お か し な お 兄さん な の で す 。 で も 、 と て も 真面目 な 人 な ん だ ヨ 。 た だ 、 で 
ぶさ ん は こん な に スマ ー ト じゃ な いな 。 右 ペー ジ の イラ スト を 見 て 研究 し て ね 区 


久実 用 プロ ブラム を 出し て よ お 一 / 
ゲー ム は みん な 確か に よく 考え て あ 
る と 思う よ 。 プ ログ ラム が まとも に 組 
め な い 私 が 言え る 立場 で は な いけ れ ど 、 
も う 一 つ 何 か が 足り な いよ うな 気 が す 
る 一 どれ も イマ イチ で すぐ あき ちゃ 
う 。 それなら 、 ゲ ー ム ば か り で は な く 、 
実用 的 な が デ ロ グ ラム を 出し て よ ぉ ー! 
だ と えば 、 小 づか い 帳 の プロ グラ ム だ 
と か 、 ど の 本 に どん な 記事 が 載っ て い 
だ か わか る プロ グラ ム と か >、 簡 単 な 日 
記 と か *…… な ん て の ゆ の 一 の も いん じゃ あ 


(富山 県 ・K) 
フー ん 、 そ だ ね 。 実用 ロク ラム 
を つぐ くっ た 人 は いる か な あ ? ゆみ に 
見 せ て よー。 近い 将来 、 実 用 スロ クラ 
ム を 載せ る 予定 が ある か ら 、 ま っ て て 
ね 
沈 作 つた だ ぞ そ ^ ! 

ボボ ジェッ ト もり ポシェット ッッ ク ラブ 
な る も の を 作り な る い 。 い や 作っ て 。 
お ね が いし ます ヨー。 そし て ボク を 会 
員 に し て 〈《 だ さい 。 企画 は ある ん で し 
ょ ? や すこ ちゃ ん 、 と ぉ 
っ て も きれい だ な 一 / (見 たこ と な 
いけ ど ) (東京 都 : ナ ンコ ロ ) 
交 作 っ た る で えー! 担当 は 、 や すご 
ちゃ ん じゃ な ぐ て 、 ゆ み で す 。 や すご 
ちゃ ん と ゆみ で じゃ ん けん を し て 、 ゆ 
み が 勝 っ た の で 、 ゆ み が や る こと に な 
り ま し た 。 わーい わーい ! イラ スト 
1 映 の まわ り に お きた 出来 事 、 涙 を 流 
す ほ は ほど お か し いこ と な ど 、 な ーー ん で も 、 
どしどし 送っ て くだ さい 。 今 な ら 、 お 
トク で す 交 


つ < 
す 大 
(の あの Gaw0 人 
グー m M お B 
DA 
の ら 
い A 
の 
:| 口 支 
グ M 
- 送 
1 
と 0 
財 
、 ね プ 
/7Z - Zooo oo の 3 や (2 よ . お . ね ロ 
わく ぐい 。 7 は 2 は よ 3Cc/ BY.RASA 下 の 
5 
ム 
増 


の ON 


祥 プ ログ ラム ポシェ ッ ト の Vol. 4 で テコ ズル の 移植 を 
行っ た と ころ 、 伊 藤 千 年 くん か ら の 文句 が 編集 部 に と 
どき まし た の で 、 さ っ そく 、 ゴ ッ ド ・ ハ ンド ・ で ぶ 先 生 
の と ころ に 持っ て 行き まし た …… キャ ン ッ グ 巡 


11 ペ ー ジ 、 で ぶ 大 先生 が 移植 し た 『 テ コ ズ ル パズル 』」 の X 1 (CD) 
用 が ありま すね 。 そ の コメ ント に 、、 

「FP や の デー ツガ す つ ご こく 長い の は ……PLAY 文 中 で 変数 ガ が 中 えな いせ 
い 」 と あり ます 。 あ りや いつ だ い 何 で す ガ ! PLAY 文 に は 文字 変数 
が 当然 の ご と こく 使 えま す 。 だ いだい 、 プ ログ ラム の 70 行 で し つり と 恋 
数 を 使 つ て いる じゃ な いで す ガ |! それ と も あれ は 数 値 変数 ガ 使 えな い 
こい う 意 味 な の で し よう か ガ ゃ 

まあ ご つ ち に し ろ P お の デー タダ は 長い こと お いと ここ と は あり ませ ん 。 
PLAY 07 二 RIGHT$ (STRS$ (INT (RND* フ ) 十 1 
) , 41) + す CHR$ (8&H41 圭 INT (RND * フ ) ) 

尽 ち 穫 の 0 ら 同 じ で こと が で きま ます 。 

それ こつ うつ いで に いわ せ て も ら う と 9 ベー ジ の 右 下 。 ユー ザー 定義 関数 
を 当然 こい つて いま す が ガ 、 こ の プロ グラ ハム で は 使っ つて も だ いし て 意味 ガ 
な いし 、RNDC 4 ) * 44 は RIND * 44 と 書け る ガ ら FNR と 比べ て も 定 
義 部 分 の スペ ー ス を 考え る と だ いし て 場所 は と ら な いと 思い ます 。 
それ に その まえ の 文 で 、DEF INT A-Z は 速 ご する だ め に 当然 、 と 
言 つ て る ん じゃ な いで すか ガ か 。 コ ユー ザー 定義 関数 は スピ ー ド に を ガ か なり 算 牧 
に し ます よ 。 ご の プロ グラ バム の に は あま の 関係 な い ガ も し れ ま せん が 。 私 
は よ は ご で な けれ ば 使い ませ ん 。 

(愛知 県 ・ 伊 藤 干 年 クン ) 
事 和 キミ は X| と いう マシ ン に 対し て は 正しい 知識 を 持っ て いる 。 が 、 も 
うち ょ っ と プロ グラ ム 自 体 を 見 な (て は イカ ン 。 ま ず FNR だ が 、 こ れ は 
RND *44 に 対し て 3 文字 も 短い 。 この 利 は 30、40 行 で 活き て いる 。 これ 
ら の 行 を RND * 44( に する と 両 と も | 行 ず つ 増 えて | 画面 に 入ら な く な 
う て 上 し まう 。 こ こん と ど とこ が 大 事 な みん だ を ! 

P$ の ほう は キミ の 意見 で も よろ し い だ ろ う 。 RND * 44 を 採用 する の 
な ら ね 。 ちなみに 「 変 数 」 と は FM- 7 や MSX の 持っ て いる PLAY ヾ N 
ーRi" と いう 機能 の こと だ 。 誰 も 文字 変数 な ど と アホ な こと 言っ と らん 
わい 1 

さて 、 実 行 速度 。 こ れ は 私 の ほう が 正しい 。 ゲ ー ム 中 で の 登場 回 数 の 
多い ラン ダム ノー ト の 実行 速度 が 速い か ら だ 。 


@ キ ミ の お 便り 移 イ ラス ト 待 っ て る ヨ / 詳 し く は 98 ペ ー ジ / 


ク ク の 


/ 才 > 衝 、 
喘 金 フ 


ング の 新制 度 


グ フ ム < ン シス テム sooooo と 陸 


今 回 か ら プ ブロ グラ ム の 評価 は 、 従 来 
の 3 段階 評価 を も やめ 、 1 グラ ムー100 
グラ ム の 100 段階 評価 し な り ま す 。 

賞金 は 1 グラ ム あ た 2 最高 で 
300 円 X100=30, 000 円 の 賞金 に な り ま 
す 人 Ag 
50 グ ラム 15,000 円 くら い に な り ま す ) 
還 グ クラ ム を た め て 大 臣 に な ろう 


1 回 ご と に 、 グ ラム 数 に 応じ た 賞金 
が 出 ま す が 、 そ れ と は 別に 通算 グラ ム 


数 が 70 グ ラム に 達する と 、 グ ラム 大 臣 

に 任命 し 、 任 命 書 を 発行 し ます 。 

だ だ し 、 第 1 期 を ポシェ ッ ト の 5 号 
か ら 7 号 ま で と し 、 通 算 グ ラム 数 は こ 
の 期間 の み 有 効 と し ます (8 号 か ら は 
第 2 期し な り 、 通 算 グ ラム 数 も ゼロ ク 


リア し 、 は じ め か ら 6 出直し で す )。 
定 区 。 よ ま 半 と に 謎 生 し だ グラ ム 


大 臣 の な か か ら 、 ポ シェ ッ ト 編 集 部 に 


よ ょ る 茂 止 な 審査 に よ り 1 人 を 選び 出し 


グラ ム 総 理大 臣 と し て 永久 に その 名 誉 
を た た だ え 、 副 賞 と し て 本 人 の 和希 望 する 
10 万 円 相当 の パソ コン 関連 商品 (ソフ 
ト で も ハー ド で も 自由 に 選ん で いた だ 
きま す 。 た だ だ し 定価 で 総額 10 万 円 を 超 
える こと は で きま せん ) を 差し あげ ま 
す 。 

含ま で の 常連 採用 者 の 諸君 、 を うい 
うわ け だ か ら 、 が ん ば っ て は ほし い 。 初 
代 総 理大 臣 は 誰 に な る か な ……・。 


用 月 の ブログ ラム の グラ ム 、 で す 


文 佐藤 も 丈 樹 (PARASHOOTER~ 添削) に 
流 削 で いろ いろ 言 つ を けど な か な か ガ 60 プラ ム 
婦 FON (マツ チ 折 り の 少女 ) 〇 画面 に スト ー 


リー ガ 怒 つ を まま と いう の は イマ イチ 。 で も ・ 


吊 考 ルー チン 付き つて の は いい ね 。 な か を と 
つて 40 グ ラム / 支 錠 部 徹 (3: 59 の 恐怖 ) ビ 
リプ レイ ・ キ ー も な いし 、 ゲ ー ム も ちよ つと 
ラン ダム の 要素 が 強い ひな 。 と いう と ころ で 
30 グ ラム 娘 MK.II (パズル 9) ちよ っ と ゲ 
ー ム と し て の 興 奪 度 に 欠け る と ころ あり 。 パ 
ズル と し て も や さ し す ぎ る 。30 グ ラム 娘 き 
ゆ し よ と も が ガ お (3 色 パ ズル ) 〇 色 は きれ い 
だ けど 、 れ 。 ブロ グラ ん / が ちょ よっ と 大 ざっ ぱ 
だ つ だ 。 キミ も 30 プ ラム 、 が ん ば の 究 く ぐれ 
文 柳田 英 催 (GSGHOT_DOWN) に っ 88 の シュ ー 
ティ ング つて 少な い の だ 。 珍し いね と いう の 
で 50 ゾ ラム * 落 合 和 彦 (果て 無き 道 ) ら グ 
ラフ フィ ッ フ ス が 小さ すぎ る ん じゃ ……。 4 画 
面 で は 無理 ど だ つ だ の で は 30 グ ラム x 芦 
刈 勝 人 (JIG) の 完 成 判 断 ル ー チ ン が な い の 
は いだい 。 30 プ ラム 太 れ いす (C.G.-100) 
ウ らい ろ ん な 要素 を 1 画面 に つつ こん だ の は す 
ご い / 女の子 だ か ら 、70 グ ラム 重 松 津 


. 留 三 (ジャ ンプ マン ) ご 新鮮 さ に は 欠け る けれ : 
・ー ダ ポー イ ) 画面 構成 に ロマ ン を 感じ る な 
・ あ 。60 ブ ラム 奴 志 後 泰 孝 (MONSTER 

・ BUILDING/NINJA) うお 、 思 わざ ず 2 本 採 
り 味 を 加え て 、35 ブ ラム KAJA(ROCK ・ 
・ 沢 栄 (TOM Kun) ちょ っ と プロ グラ ム が ガス 
・ パ ゲ ツテ イィ だ けど 、 遊 べ る ゲー ム 。50 プ ラム 
・ 文 蛇 夢 て (FOOT MACK & BUG) : 


ど 年 の 功 で まとめ た だ 。50 ブ ラム 文 河野 医 格 
STRANGE SNAKE) > ごく あたり ま 
え の ス ネー フク 8 ス クロー ル ゲ ー ム に ちよ っ ぴ 


ETJOURINEY) 〇 6001 の 1 画面 の 制約 を 
よく 乗り 越え だ 。40 グ ラム 丸 浅 川 徹 (GOLD 
RUSH) ら パグ が いつ ば い 出 だ ん や で / 減 


点 し て 30 プ ラム G(JS-70) 見 ば え は ・ 
・ な い 。 次 回 作 に も 期待 し て し まう 、 70 グ ラム 


する ん だ けど 、 そ の わり の に 40 グ ラム * 天 下 


・・ の PO-1250 (タイ ヤ 引 き 競 争 ) 
・ 想 ガザ ゆ か ガ い 。50 ブ ラム 
・ NT) 


> 一 記 遊 べ る けれ ご ど 、 もう ひ と 工夫 ほし 
い 。30 グ ラム 


> 最初 は カン タン 


到 KINTA (WY VE 
支 ぐ 


ま 、30 グ ラム だ ね 、 


ん 、 ど う も ね え 。30 グ ラム 支 未 松 賢司 ( ソ 


用 し て し まつ だ 。 ま と め て 、70 グ ラム 堀 


ッ ピ A 
SOPIA で これ だ | け の ゲー ム は 、 最近 見 て い 


> ゲー ム の 発 ・ 
久 保田 直行 (FRO : 
・ 成 か な 。30 ブ ラム 
丸 飯 尾 真也 CAIR BATTLE) ・ 
・ ご 他 で 見 だ た こと の な い 新 鮮 さ 。 1 画面 に お さ : 
・ め だ う え に ゲ ー ム の 時 本 的 要素 も お さえ て あ 
・ る ね 。60 ブ ラム 娘 助 川 博明 CANNON B 
・ ALL) や と に か ぐ ご 速 さ が ミリ ヨク 。 で も 変化 
・ に 欠け る な 。40 プ ラム ど どん (APPL 
・E HUNTING) ご この ゲー ム は 、 わ り の と 人 ・ 
・ 気 あつ た ん だ 。 で も 、 ク ー が ね え …… と いう 
: と ころ で 、50 プ ラム に な り まし た 松 田 智 
: 裕 (WALL & WALL) 」 
・ そう だ けど 、 ら 面 以降 は お も し ろ い 。 
: 40 プ ラム バン プ CLFE GAME) こ 、 
・ こい つ は 締切 り 守 ら へ ん か つた ん や 。1 グラ 
・ ム だ 、 お まえ な ん か 
・ RN) 遊ん で て 楽し か つ だ 。 70 プ グラム x こ 
・ ろ ね ご An(LUSTER) ら キ ャ ヤラ も だ くさ ん 
・ で て き て 、 オ リ ジ ナ リティ も ある 。 50 プ ラム 
・ だ いみ よー じん (Fm あ が て る ) ら 広 が り 
・ の ある アイ デア 、 だ け / 
・ 中 西 ぐ ん 娘 レ ル バ ル ウ (CRASFHD ら う 一 


・ プラム 婦中 里 英司 て BEES) 
・ー ル 、 ダ ブル は いい けど 、 ま だ だ りな い 。30 
の ラム 
・ シッ プ が よ か つ た だ 。50 グ ラム 


・ よ ぐま と め て ある ね 。 50 ブ ラム 


2 


・50 ブ ラム 


還 土 無 双 (DORAKYURA) 月 が 動い 
て いく の に は 、 感 尺 。 で も ね 、 ち よ つ と 未完 
混 辺 隆之 (TYPE R 
UNNING) ほら よ く ぞ ゲー ム に し て これ だ ね 。 
ミス ・ キ ー に ベ ペナルティ な ど ほ し か ガ つ だ 。 50 
ら 和 型 め スク ロ 


文 佐藤 昌樹 (PHOENIX) ら マザー 
文 原田 浮 史 ( ケ 


ロッ ガー) 見 を こと の ある ゲー ム だ けど 、 


文 条 聞 健二 (DRIFTING G 
主体 に よく でき て いる けど 、 緊 迫 


早 こ も 大 臣 が 誕生 。 れい 子 ち ゃ ん は グラ /、 


・ 文 部 大 臣 、KINTA は グラ ム 防 衛 大 臣 、 宮 後 
・ こん は ブラム 厚生 大 臣 〈 あ フロ 好き みた い だ 
・ か ら )、 蛇 夢 は だ だ の グラ ム 、 大 臣 、 由 紀 ち ゃ ん 
・ は グラ ム ス ポ ー ツ 大 臣 、 小 島 こ ん は ブラ / 水 
・ 教 大 臣 に 任命 する 。 以 上 。 追っ て 通知 が ある 
・ ま で 、 自 宅 で 待つ こと 。 い や 、 ま あふ つう に 
: 生活 し て れ ば よろ し い 。 


田 守 由 紀 
・ (TAP-TAPD> YUKI ち ゃ ん の 独特 ゲー ム 。 
・ 目まぐるしい けど 70 プ ラム 吉岡 散 明 の = 
イス ノ フ ニラ マモ レ ) ら お し ろ 次 作 を 期待 し 
: だ い 30 プ ラム は ん ちゃ ん (GOUPLA 
イー ここ 
・ め て 。50 ブ ラム OUT /〈 科 特 隊 ) : 
2 シフ 0 Ce ウン 
支 井上 和紀 (BATTLE FIELD) 

・ ウブ ッ と 遊べ ちゃ つ だ 。60 グ ラム 。 友達 と 分 
・ け て ね 文 小 時 聖 (地獄 の 迷路 ) ら ゲ ー ム と 
・ し て の 配慮 も 行き こ ど い て いて 完成 され て い 

・ る 。 70 ブ ラム 
・AME) ら 
・ 感 が び も うち よい 。50 ブ ラム 


< 


〒 大 阪 府 ・ み の だ けん いち 


ボ S ェ ュー ト の ほぼ ー そ 宅 
ジン ンプ ピン と 
ンプ < の メー キー ピニン 
ん ( 多 < そ デー と . 
ぃ - つ いふ ヽ 守 い ちょ. 偽 。 
ニー で り e 沖 穫 ぶす 
で むい 、、 
と アマ ) て ヒジ 
さん / ニク る 
さる (ご よめ 中 2 


、 @ お 便り 、 イ ラス ト 、 マ ン ガ な ど 、 な 
、 ん で も まとめ て 「 ゆ みち ゃ ん 」 係 へ 。 


Vol. 5 の 添削 へ の 文句 、 アラ 探し な ど 
と に か く 添削 担当 の で ぶ を 鋭く 追及 し 
て (だ さい 。 過激 な 批判 ほど 大 歓迎 。 
パカ な ! と 思っ た ら す ぐ 「 私 が 正 し 
い 」 係 まで 。 “ に 


テー プ で 投稿 

プロ グラ ム は 、 必 ず カ セッ ト テ ー プ 
(で きれ ば パソ コン 用 の 15 分 以下 の も 
の ) に 、 セ ー ブ し て 送っ て くだ さい 。 
① 必 ず 、 ベ リフ ァ イ す る こと 。 

⑧ 用 心 の た め に ら 回 以上 同じ も の を セ 
2 9 6 さら 

③ フ ァイル ネー ム 、 機 種 名 等 を テー プ 
に 正確 に 書く こと 。 

②③ 1 本 の テー プ に は 原則 と し て 1 本 の 
プロ グラ ム を / (プロ グラ ム が どら ど 本 以 
上 入っ て いる と 見 すご すこ と が あり ま 
まり 8 


必要 事項 を 書い た 
手紙 を . ノ 


テー プ と いっ し ょ に 、 次 の 事柄 を 正 
人 に 記し た 手紙 を 同封 し て くだ さい 、。 
も し 、 手 紙 が 不備 な 場合 、 プ ログ ラム 
が よく て も ボツ に な る こと が あり ます 。 
① プ ログ ラム を 作っ た 機種 名 ・ 言 語 

(機種 に よっ て は BAS1O 名 や ペー ジ 


K 用 者 の dU% は この 
ルー ル を 守っ て いま す 


数 や 増設 オプ ショ ン な ども 正確 に )。 

⑤ ロ ー ド 方 式 を 明記 (ファ イル ネー ム 、 
ボー な ご は も ちろ ん 、 ロ ー ド する た め 
の コマ ンド 、 セ ー ブ し た と き の レ コー 
ダー 機種 名 な ご ども)。 

③ プ ログ ラム の 遊び 方 、 使 い 方 (使用 
キー の 説明 や ゲー ム の ルー ル な ど を な 
る べく 詳し くわ か りや すく 。 ゲ ー ム ス 
トー リー な ご も あれ ば 書き そえ て くだ 
さい 。 な お アド ベン チャ ー ゲ ー ム は 答 
で も yiL/ ポ に ん 

③④ 変数 リス ト (プロ グラ ム で 使用 の 変 
数 名 と その 意味 を 明記 し て くだ さい )。 
⑤ プ ログ ラム 解説 (デバ ッ ク や 解析 が 
し や すい よう に 、 プ ログ ラム の どの 行 
で こい うこ を や ゃ て る が か が 、 な の 
し く 書 いて くだ さい )。 

⑥ 参 考 文献 参考 プロ グラ ム を 明記 ( プ 
ログ ラム を 作る と き に 参考 に し た 本 ・ 
雑誌 の 年 お よび 月 号 ・ ペ ー ジ 数 、 記 事 
名 ・ プ ログ ラム 名 を 正確 に )。 

⑦ 郵 便 番 号 ・ 住 所 ・ 氏 名 (ペン ネー ム 
が あれ ば それ も )・ 年 令 ・ 職 業 (学校 ・ 


ノブオ ガ ー ベ バツ ド 


学年 )・ 電 話 番号 も 忘れ ず に 。 


封筒 で 仕上 げ ./ 


封筒 の 裏 に も 、 住 所 ・ 氏 名 の ほか 、 
機種 名 ・ ロ ー ド 方 式 を 明記 し て くだ さ 
い 。 

封筒 の 表 に は 、 プ ログ ラム の 部 門 名 
(] 画面 ゴロ グラ ム 部 門 ・ シ ョ ー ト プ 
ログ ラム 部 門 ・ 本 格 プ ログ ラム 部 門 の 
つが あり ます ) を 赤 で 明記 し て くだ 
eS)o 


あて 先 は 


TIOUI 東京 都 千 代田 区 神田 錦町 -Z6 
小笠 原 ビ ル 4F テク ノ ポ リス 編集 部 内 


ポ シ イ 狂信 導 
@ | 画面 プロ グラ ム 
の ショ ー ト ジロ グラ ム 


@ 本格 ブ プログラム 係 
@ ゆみ ちゃ ん 
@ 私 が 正しい 

@ プレ イ バ ッ クチ ェ ッ ク ポ イン ト 


ッ ツ ッ ヒ ッ ボ ポシェ エッ ト VOI.4 よ り の 


バ パク 通信 
9 
J83 2: 
依 P11 MSX 用 リス トーー-100 行 目 に ゴミ が 
つい て いま し た 。 上 は バイ 」、 下 は 'FG」 が 
が くれ て いま す 。 
信 P13『TENTEN』」 リ スト ーー-90 行 目 の 最 
後 が 欠け 。“ 壮 半 寺 の あと は 、:HS: と 続 
きま : よ 。 
@P21『「FIRE BUG』」 リ スト ーー280、290 
行 目 の 真 中 あたり が 消え て いま す 。 前 後 
を まとめ て 書く と 、280 行 ……IFA>2 0R 
@ P28『 ス ペー ス メ テ オ . ク ラッ シュ 』 リ スト 1 
ーー20 行 N= ニ 100 は N= テ 90 。 
価 P55『JUMPMANII』」 の リス トーー こ れ 
は バグ で は な いけ と 質問 が 多かっ た の て で 。 矢 
E[ の 形 は キー ボー ド か ら は ふつ う の 方 法 で は 
入力 で き な い 。 そ こ で 、 そ の 行 を 入れ る まえ 


に 、 ダ イレ クト モー ド で 、PRINT せ 0CHR 
$ (31.29) リタ ー ン で 「 ) 一 」 な ど を 表示 さ 
せ 、 こ れ を イン サー ト ・ キ ー て で 後ろ に 追い や 
り 、 行 を 入れ る の だ 。 研究 し よう 。 

価 P62『SPACE COMBAT 』」 の リス トーーー 
760 行 、780 行 、790 行 の 真中 あたり が 欠け 。 
760 行 は COLOR 6 、 780 行 は (X, Y )790 行 
も 同様 に 閉じ カッ コ が ボッ コリ 抜け て いま す 。 
殺 P75『LOTLOTLOT』 チ ェ ッ クボ ポイ ント 一 - 
ーrestore400 は 、restore410 の 間違い / 

僅 P89『TINY FEVER』」 リ スト ーー-ーP0- 61 
0 行 、RAN#- の あと に 、 ピ リオ ド (.) が 抜け 
て いま す 。 これ は 小雪 点 。 

お お っ と 、 忘 れ て た 。P12-13 / ここ で 
作者 の 顔 写真 が 入れ か わっ て いま す 。 ご めん 
な さい 。 


バッ ク ナ ン バー 


@ 避 浴 種 用 シ ョ ー ト ブロ グラ 
35 本 人 RUNRUN 添 前 救 室 
@ 動 ここ 〇 G つ い に 登場 


マッ ンプ 


@ 光 機種 用 ショ ヨー ト ・1 画 
面 プ ログ ラム 48 本 満載 氏 添 
に ホー 人 RM 7 2 


の お 知ら せ 


@ 機 種 用 プロ プラム 台 計 
45 本 傘 親 切 も く 
横顔 つき 代 RUN RUN 


@ 機 種 用 親切 角 説 付 44 本 
お も し ろ プ ログ ラム 旬 FIM- 
ん 国 HI 還 RUNRUN 添 前 


バッ ク ナ ン バー ご 希望 の 方 
は 、 お 近く の 書店 で ご 注文 
だ さい 。 ま た 、 直 接 注 文 の 場 
合 は 号 数 を 書い て 、 本 代 丁 送 
料 (250 円 、 1 局 増え る ご と に 
50 円 増し ) を 現金 書留 か 郵便 
振込 (東京 4-.44392) で 、 下 
記 へ ご 注文 くだ さい 。 
〒105 東京 都 港 区 新橋 4-10-1 
徳間 書店 特販 部 
会 03 -433-6231 


< 過 療 > 


N. じ の < マー H' 違 


レ と 作者 の 


< 過 療 > 


に. デ O の マデ アマ SH 
昌 〇 の の 


F ァ -Om て 0 X の りく 】0T 


MSX 用 但 お も し ろ ブ ログ 
グラ ハム 全 25 本 倫 ビ ギ ナ ー ズ 


楽し ん ぐ タ ノ タ ノ の クリ スマ ス が 
も うす ぐ や っ て 来 り ん ぐ グ リグ リ / 


- 珍 み な し ゃ て ん / VolL5 か ら 、 突 然 あ っ ちゃ こっ ちゃ 
に 登場 し は じ め た アラ レ こ と ゆみ で ーー す 。 あ た い は 、 
か らい も の が 大 嫌い で す 。 お すし は わさび ぬき 、 ビ ピザ 
に タバ スコ を か ける な ん て と ん で も な い 《 層 ん で も 8 
- 分 、 歩 いて 10 分 、3 時 の お や つ は 文明 堂 ……)。 あの 有 
名 な カレ ー 屋 さん で 1 番 甘 い ~ ソ フト マイ ルド " を 、 
ぶる ぶる 豆 い な が ら 食 べ て 涙 が 出 ま し た 。 2 
や っ ぱ カ レー は 星 の 王 子 さ ま に 限 る メ / 
P.S. お 手紙 ちょ ーー らい / まっ て ます ぅ ツ 

(年 中 無休 で パカ や っ て る ゆみ ) 
@ 今 回 の ポシェ ッ ト は 、 ちょ うど 大 学 の 学園 祭 と 重 な 
つて し まい 、 ね この 手 も 借 り けた いく らい に 忙し か っ た 。 
学園 祭 に 関係 の な い 人 は 、 1 週間 お 休み だ っ た か ら 、 
うら や まし か っ た よ 。 で も 、 も う 早 いも の で 12 月 。12 
月 と いえ ば 、 ク リス マス に 冬休み 。 体 み に 入 る と 、 デ 
みみ ポリ 漬け に な り そ う で 、 ち ょ っ と 写 配 で すね 。 

と ころ で 、 前 号 で 捜索 珠 を 出し た 、FX-702P は 、 つ 
い に 戻 っ て こ な か っ た 。 う えー ん 。 も し 、 だ れ か 安く 
譲っ て くれ る 優し い 人 が いた ら 、 お 手紙 で (FEL は 茂 
禁 ) ポシェ ッ ト 綿 集 部 「 た けち ゃ ん に FX-702 を 譲る 」 
係 ま で 送っ て ね (マニュ アル , 頼 は な く て も いい よ )。 
HH (た けち ゃ ん ) 
参 こ こ だ か ら 言 える みん な の 欲し いも の ジ シリー ス 

た けち ゃ ん の 1 番 欲 し いも の は 、 製 図 の 単位 で す 。 


テク ノ ポ リス 増刊 


ログ ラム ポシェ ッ ト 第 5 号 


発行 人 山下 辰己 


の SKU toae 4 の て っ > っ て 


ーー で ぶ の 1 番 欲し いも の は 亜美 ちゃ ん で す (うっ ぷ /- …) 


ゆみ ちゃ ん の 1】 番 欲し いも の は 「 カ ラム ー チ ョ 」 で す 。 
ハッ トリ 寺 の 1 番 欲 し いも の は 、 あ と 3 年 の 独身 生活 
で す 。 倒 の 山科 さん の 1 番 欲し いも の は 、 ま と も な デ 
ル バ イ ト で す (よい し ょ っ と )。 ちな み に 、 私 の 1 番 欲 
し いも の は 、 さく ら さ ん の LATUMOFIS で す 。 

(うち の サク ラ が アホ で て こま る クー) 
きこ ん ば ん は 、 イ ラス ト 担 当 の パン プ で す 。 お まけ に 
X-1 で 1 画面 プロ グラ ム を 作っ て し まい まし た 。 今回 
は これ し か や っ て ませ ん 。 よ っ て も うお し まい 。 次 回 
を お 楽し み に 。 (パン プ ) 
重 宛 談 で 書い た ら ホ ント に 廊 旬 が きた 。 ち ょ っ と 鋭い 
の で ビビ ピッ て し まっ た が 、 や は り 結 果 的 に 予定 どおり 
私 が 正しかっ た 。 あ あ 、 一 度 で いい か ら 正 し く な く な 
っ て みた い 。 (常に 正しい で N) 


マニ コア ル 俺 人 生 マ シン ガイ ド 


旬 本 誌 の 入 集 狂 記 は 、 編 集 が 始ま る まえ に 書か れる イ 
ンチ キ ペ ー ジ だ けど 、 う ちの 敢 後 記 は ホン マモ ン の 人 後 
記 で っ せ 。 こ の 後記 を 書い て か ら } 週 間 後 に は 、 ボ シ 
ェ ッ ト の 印刷 が 終わ る の だ 。 き の う は 印刷 屋 さ ん に さ 
ん た ざん お こ られ ちゃ っ た し 、 い つ に な っ た ら 和 早く 後記 
が 書け る ん だ ろう 3 う 。 

疹 や は り 日 本 人 に 横文字 は 似合わ な い ぜ 。… 

こと で また また 表紙 が 変わ り ま し た 。 や っ と ログ ラム ・ 
オシ ェ ッ ト と 読む 人 が いな く な り ま し た 。 よ か よ か 。 
そん じゃ また 、 来 年 ネ 。(Merry Xmas ハッ トリ くん ) 


銀 編 集 担当 山森 沿 


信 績 集 山科 教 之 


の 表紙 デザ イン 鈴木 俊明 
信 本 文 デ ザイ ンプ スズ キト シア キ デ ザ イン オフ ィ ス 
イラスト と り い か ず よ し ・ ・ 増田 秀 美 ・ 金 子 や す よ し ・ 橋 岡 正和 


@ 写 真 / 萩 原 俺 


呈 コ @ 技 術 / 人 松下 武 論 ・ 氷 吉 敏男 ・ 渋谷 隆 


参 フ ィ ニ 
「 ーー 1984 


ッシュ ・ デ ザイ ン ノ 條 創 文 新 社 
人 の 印刷 印 肌 - 


 。 ラス ト Ho な よび プロ グラ ム 


0 ド 


僕 と 生活 する 


モ ガ の パン コン は 、 僕 が 遊ぶ 時 も 学ぶ 時 も 、 
いっ し ょ 。 だ と えば 、 僕 が 1 年 ご と 進級 し て 
いで 周 じ よう 代 、 さ の パン ラン シン もち 人 使い 坊 に 
よっ て グレ ー ド デップ し て いく 。 高 性 能 だ か 
ら 便利 で スピ ー デ ィ 。' で も 操作 は カン タン 。 
ホン ト 、 い っ し ょ に 生活 し て いて 、 暮し や すい 。 
ーー 区 2 の 0 ウォ ンジ シ 40 だ が だら て まう と 。、 いっしょ 
に 生活 し て 行け そう 、 だ 。 


SC-3000 本体 標準 価格 \29,800 
SC-3000H 本 体 標準 価格 \33 800 


バ パソ コン ファ ン は 絶 次 し た 。 強力 な 周辺 機器 
\79.800 


ーー 多 機能 マル チ 接 続 マ シン 。 その 名 も スー 
バー コン トロ ー ル ・ ス テー ショ ン < く SF-7000> 
介 8B バ パラ レル 問 子 装備 / ワ ー プ ロ ・ 作 図 に 各種 大 型 
の ブリ ンタ 、 プ ロッ タ に 接続 可能 。 倫 RC-232C 端 子 半 
備 / 各 種 の デー タ 入 出力 に パソ コン 相互 接続 や 遠 距 
離 接続 (電話 使用 ) が 可能 。 倫 大 容量 640KB 内 蔵 / た 
と えば 年 賀 状 の 差し 出し 人 リス ト を 作る な ど 、1 行 50 音 
で ナン ト 500 人 分 も メモ リー。 介 高 性 能 コ ン パ クト フロ 
ッ ピ ー デ ィ ス ク 内 蔵 但 ワイ ド な 互換 性 /MSX パ ソコ ン 
に も 使え る 。 但 ディ スク ・ ベ ー シ ッ ク つ き ( 同 棚 ) 


林 式 間 ラ チラ エン ター プラ イ ゼ プ 


〒144 東京 都 羽 


ッ ツ ペー ツジ 嗣 計 記章 9 12/31』c 


期間 中 、SC-3000 か SC-3000H を お 買い 上 げ の 方 に 全員 


っ に 、 ア ノ 人 気 の ソ フト ゲー ム 「 ロ ー ド ラン ナー」 を プレ 


ゼン ト グ ーー は っ きり 言っ て 、 こ の チャ ンス 、 見 の が し 
4 まあ 化 て ( な いら 


、 


ド を 使え ば 、 オリ ジ ナ ル 画 面 を 176 面 まで 作れ る ぞ そ . ん 


h。 まい 
BN ば 
1 直 本 m 


時 に 、 


デ テ ネ @@ い Eni ズ だ で E だ EE る 9 の っ E トド み ミ を と て を ks、 重 の の 


セガ の ゲー ム ソ フ ト No1 独占 「 ロ ー ド ラン ナー」 


迷路 の 謎 を 解き 明か し な が ら 、 敵 の 追跡 あか わし 、 宝 を 

奪っ て いく この ゲー ム 、 画 面 は ナン ト 80 面 。 き ら に キー 
ボー ド を 使え ば 、 自 分 ど だ け の オリ ジ ナ ル 画 面 も つく れる 。 
興奮 度 で 一 歩 リ ー ド し た セガ 版 「 ロ ー ド ラン ナー」。 


(DSJ-300 ②SC-3000H ③SF-7000 ④SJ-200 ⑤SP-400 


6 勉強 が 楽し く な る な ん て 言え を ば ウン に な る 

応援 し ます 。 バ パソ コン 学習 けど 、 で も 、 教科書 や 参考 書 と ニラ メッ コ し 

2 て や る より は 、 ず っ と お も し ろく 勉強 で きる 。 各 
措 宮 な 学 選 ヽ 

^ 豊 時 な 学 省 ブ フト? 教科 別 ・ 学 年 別 と 種類 豊富 。 各 \3,800 
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セガ SC-3000 シ リー ズ 、 SG-1000 シリ ー ズ は 
ツク ダ オ リ ジ ナ ル 製 ゲー ム ソ フ ト が 使え ます 。 


田 1-2-12 容 (03)742-3171( 大 代表 ) 


パー ソナ ルコ ンピュータ 事業 本 部 


カセ ッ ト デ ー タ レコ ー ダ ーLMC-1001 形 
、 8532 
※ 画 面 は 、 は めこ み 合 成 で す 。 


O 〇 だ ネ テ /& 4 テレ ビビ 1XON 


回 ハー ジョ ン ・ ツ ソー BS 


三 ュ ー タ ププ 
M S X テ レビ ・PAXON の 第 二 弾 、(Ver.II》 は 、 
テレ ビ ・ デ ィ ス プレ イモ ニタ ー・M S X パ ソコ 
ン の 3 つの 機能 が 楽し め 、R A M 容 量 は 32 K 
バイ ト 搭 載 。 さ ら に R G B 端 子 ・A V 入 力 端 
子 を 備え た 拡張 性 に 富ん だ 未来 派 マ シン で す 。 
RGB 端 子 で 本 格 的 な モニ ター 機能 を 発揮 
一 般 の パソ コン 接続 用 に 角形 8 ピン RGB 納 
子 (TTL レ ベル ) を 装備 。 外 部 パソ コン か ら R 
GB 信 号 を ダイ レク ト に 入力 し 、 実 使用 2,000 
文字 表示 の 高 精度 ファ イン ピッ チ プ ブラ ウン 管 
へ 、 鮮 明 に 表示 し ます 。 将 来 、 よ り グ レー ド 
アッ プ し だ た だ パソ コン シス テム と する 場合 に と 
っ て も 便利 。 本 格 的 な が ゲ ィ スプ レイ モニ ター 
と し て の 機能 を 充分 に 果たし て くれ ます 。 

AV 入力 端子 で AV 機器 か ら ダ イレ クト 入力 
お 手持 ちの VTR・ ビ デオ ディ スク 等 の AV 
機器 や 、 衛 星 放送 用 チュ ー ナ ー が ダイ レク ト 
に 入力 で きる 映像 ・ 音 声 入力 端子 を 装備 。 信 
号 変換 ノイ ズ な どの 障害 が 少な いた め 、 忠 実 


PCT-55 形 (テレ ビ 本 体 ) 
標準 価格 138,000 円 


で 鮮明 な 映像 再生 が 行わ れ ま す 。 

MSX パ ソコ ン の RAM 容 量 は 32K バ イト 
は 、32K バ イト を 搭載 。 ビ ギ ナ ー の 方 が ブロ 
グラ ム を 組む 場合 や 大 容量 を 必要 と する ソフ 
トウ ェ ア に も 余裕 た だ っ ぷり で す 。 

還 フ パソ コン 操作 の 途中 で 、 テ レビ に 切り 換え 
て も 記憶 きせ た プロ グラ ム が 保護 され る メモ 


リー ホー ルド スイ ッ チ 採用 年 電 源 「 〇 N」 の 状 
態 で 、ROM カ ー ト リッ ジ を 抜き 差し し た 場合 
の トラ ブル を 防止 する スロ ッ ト ス イッ チ 採 用 


PCT-55・50 形 の 共通 特長 2 糧 請 謗 


@R G B 回 路 直 結 で グラ フィ 
ッ ク 表 示 や 小さ い 文 字 も 鮮明 
表示 @ パソ コン の 画面 ズレ が 
な く 調 整 不要 @ テレ ビー パソ 
コン の 切換 えも ワン タッ チ 。 
アン テ ナ 線 の 着脱 や 配線 の 手 
間 も 不 要 @ 有線 テレ ビ 放 送 
(ミッ ドバンド ) も 受信 可能 。 


50 人 に 
ゲー ム ソ フ ト が 当る . ノ 
資料 請求 券 を ハガキ に 貼 
り 、 住 所 、 氏 名 、 年 令 、 
職業 を ご 記入 の 上 、 昭 和 
60 年 | 月 7 日 (当日 消 E 
有効 ) まで に 下記 へ お 送 
りく だ さい 。 抽選 で 50 名 
様 に MS X ゲ ー ム ソフ ト 
を プレ ゼン ト 。 発表 は 賞 
品 の 発送 を も っ て か えさ 
せ aSON だ 7 及 き ます 


プロ ッ タ ー プ リン ターPCP-5501 形 
標準 価格 54.800 円 


ディ スプ レイ モニ ター 


パソ コン 入門 に 、 テ レビ に …… 
気楽 に 楽し め る スタ ンダ ー ド 機 


テレ ビ PCT-50 形 標準 価格 128.000 円 


キー ボー ド PCK-50 形 標準 価格 18,500 円 
ジョ イス ティ ッ ク PCJ-50 形 標準 価格 ( ゃ 3,500 円 


(シル バー(S) も あり ます ) 


高 解像度 カラ ー 
CRT デ ィ ス プレ イ 


DM-405 形 く <14 形 > 
標準 価格 67,800 円 

@ スー バー ダー ク ブ フラウ ン 管 採用 
@ 8 ピン /21 ビ ンコ ネクター 半 備 


お 年 玉 プ レ ゼ ント 及び お 問合せ は : 株式 会 社 ゼ ーー は Je yo を (866) 1111 (大 代表 ) 


※ ご 購入 の 際 は 、 購 入 年 月 日 、 販 売店 名 な どの 所 定 事項 を 記 


⑥ 徳 間 書 店 1984 


し た 保証 


印刷 凸版 印 局 


書 を 必ず お 受け 6 りく だ さい 。 駅 4 は マイ クロ ソフ ト 社 の 商標 で す 。 
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